Question

我已经读过在R中有两张纸的excel文件，其中第一张纸有四列，第二张纸只有一列。在我读完R中的第一张纸后，但仍然没有很好的结构。我想摆脱不受欢迎的专栏。

当我从R中的excel文件中读取第一张工作表时，它看起来像这样：

> head(data)
    User ID   Group       Week  Spend Purchases     
1 173366631    Test 2014-10-06 546.87         4 <NA>
2 144427921    Test 2014-10-06 218.09         3 <NA>
3 213641575    Test 2014-10-06  18.75         1 <NA>
4 614549153 Control 2014-10-06  29.98        15 <NA>
5  84652272    Test 2014-10-06 628.16         4 <NA>
6  75292137    Test 2014-10-06   8.46         1 <NA>
  structure(c(NA_character_, NA_character_, NA_character_, NA_character_, 
1                                                                     <NA>
2                                                                     <NA>
3                                                                     <NA>
4                                                                     <NA>
5                                                                     <NA>
6                                                                     <NA>

如何在“购买”栏后删除列？我怎样才能在我的数据中保留五列（a.k.a，User ID，Group，Week，Spend，Purchases）？

Answer 1

我们可以使用[对列进行子集

data <- data[1:5]

如果需要特定于"Purchases"

data[seq(grep("Purchases", colnames(data)))]

Answer 2

lines <- ('User_ID  Group Week Spend  Purchases
173366631 Test 2014-10-06 546.87 4 <NA>
144427921 Test 2014-10-06 218.09 3 <NA>
213641575 Test 2014-10-06 18.75 1 <NA>
614549153 Control 2014-10-06 29.98 15 <NA>
84652272 Test 2014-10-06 628.16 4 <NA>
75292137 Test 2014-10-06 8.46 1 <NA>')

df <- read.table(text = lines, header = TRUE)

df[, -which(names(df) == 'Purchases')]

如何从R中的excel文件中删除不需要的列？

2 个答案: