使用正则表达式更改列名称

Question

我有五个名为organoleptic的列.1.感官.2.,感官.等等在称为"df"的数据框中.我想将它们重命名为organoleptic1,organoleptic2,organoleptic3等.也就是说,我想删除数字周围的两个点.我使用名称功能做到了:

names(df)[names(df) == "organoleptic.1."] <- "organoleptic1"
names(df)[names(df) == "organoleptic.2."] <- "organoleptic2"
names(df)[names(df) == "organoleptic.3."] <- "organoleptic3"
names(df)[names(df) == "organoleptic.4."] <- "organoleptic4"
names(df)[names(df) == "organoleptic.5."] <- "organoleptic5"

但是,我想只需键入一行代码即可.是否可以使用正则表达式或任何其他技巧来做到这一点？很多thx!

Answer 1

我们可以尝试使用gsub功能.编辑:从固定sub到gsub

colnames(df) <- gsub('.', '', colnames(df), fixed=TRUE)