从R中的数据框中提取具有相同标题的变量

Question

我有一个庞大的数据集。 这是一个例子：

Ac.1<-rnorm(100, 0, 1)
At.2<-rnorm(100, 0, 1)
Ae.3<-rnorm(100, 0, 1)
Ba.1<-rnorm(100, 0, 1)
Bc.2<-rnorm(100, 0, 1)
Be.3<-rnorm(100, 0, 1)
Cb.1<-rnorm(100, 0, 1)
Cy.2<-rnorm(100, 0, 1)
Cc.3<-rnorm(100, 0, 1)

当前数据集如下所示：

current.df<-data.frame(Ac.1,Ae.3,Ba.1,At.2,Bc.2,Cb.1,Cy.2,Be.3,Cc.3)

我想创建一个具有相同标题“ B”的小日期框架，名为small.df 。 它看起来像

name(small.df)
[1] "Ba.1" "Bc.2" "Be.3"

Answer 1

您可以选择列。

small.df <- current.df[, c("Ba.1", "Bc.2", "Be.3")]

或选择所有以“ B”开头的列。

small.df <- current.df[, grepl("^B", names(current.df))]

Answer 2

您可以通过选择字母来执行所需的过程。
您可以结合使用assign和regexpr来找到您的col并分配最终的DF：

#Chose your Letter
 letter <- "B"

#Find columns in colnames with a regexpr
cols <- which(regexpr(paste0("^",letter),names(current.df)) != -1)

#Assign a letter variable dependant name to your new DF
assign(paste0(letter,".small.df"),current.df[,cols])

希望会有帮助

Gottavianoni