2,如果已经载入数据,数据名为a,那么使用colnames(a)=a[1,],就可以把a的行名变成a的第一行数据,然后a=a[-1,],删除第一行数据,就可以了。当然如果你需要,也可以保留第一行数据。
假如已经将上面的数据读入了R中的data.frame中,并保存为df变量library(stringr)
df$ID <- row.names(df)
df$ID <- str_extract(df$ID, '\\d+')##提取数字
2,如果已经载入数据,数据名为a,那么使用colnames(a)=a[1,],就可以把a的行名变成a的第一行数据,然后a=a[-1,],删除第一行数据,就可以了。当然如果你需要,也可以保留第一行数据。
假如已经将上面的数据读入了R中的data.frame中,并保存为df变量library(stringr)
df$ID <- row.names(df)
df$ID <- str_extract(df$ID, '\\d+')##提取数字