Filter()函数无法识别我的数据

Filter()函数无法识别我的数据,r,filter,R,Filter,我在尝试筛选数据集时遇到了一些问题 我的数据集包含有关道琼斯指数数据的信息,有750个观察值和16个变量。(我将附上一个屏幕截图,因为粘贴代码会使其看起来凌乱和复杂): 为了获得更多信息,我将道琼斯指数数据分为四分之一和二分之一。 我的目标是在我的任务中使用季度数据,并按行业将股票分成若干组。 它以前工作过,但突然之间,代码无法识别变量“Stock” 我将感谢你的意见 问题是由于使用了错误的过滤器功能。有一个stats::filter,其行为不同于dplyr::filter。假设我们不加载任何包

我在尝试筛选数据集时遇到了一些问题

我的数据集包含有关道琼斯指数数据的信息,有750个观察值和16个变量。(我将附上一个屏幕截图,因为粘贴代码会使其看起来凌乱和复杂):

为了获得更多信息,我将道琼斯指数数据分为四分之一和二分之一。 我的目标是在我的任务中使用季度数据,并按行业将股票分成若干组。 它以前工作过,但突然之间,代码无法识别变量“Stock”


我将感谢你的意见

问题是由于使用了错误的
过滤器
功能。有一个
stats::filter
,其行为不同于
dplyr::filter
。假设我们不加载任何包

filter(mtcars, mpg > 15)
#Error in filter(mtcars, mpg > 15) : object 'mpg' not found
因为它是
stats::filter

装完包裹后

library(dplyr)
filter(mtcars, mpg > 15)
#                    mpg cyl  disp  hp drat    wt  qsec vs am gear carb
#Mazda RX4         21.0   6 160.0 110 3.90 2.620 16.46  0  1    4    4
#Mazda RX4 Wag     21.0   6 160.0 110 3.90 2.875 17.02  0  1    4    4
#Datsun 710        22.8   4 108.0  93 3.85 2.320 18.61  1  1    4    1
#Hornet 4 Drive    21.4   6 258.0 110 3.08 3.215 19.44  1  0    3    1
#Hornet Sportabout 18.7   8 360.0 175 3.15 3.440 17.02  0  0    3    2
#Valiant           18.1   6 225.0 105 2.76 3.460 20.22  1  0    3    1
#Merc 240D         24.4   4 146.7  62 3.69 3.190 20.00  1  0    4    2
#Merc 230          22.8   4 140.8  95 3.92 3.150 22.90  1  0    4    2
#Merc 280          19.2   6 167.6 123 3.92 3.440 18.30  1  0    4    4
# ...

甚至在不加载包的情况下,也可以使用函数

dplyr::filter(mtcars, mpg > 15)

OP的代码可以缩短为

dplyr::filter(Quarter_1, stock %in% c("CSCO", "IBM", "INTC", "MSFT"))
或者创建一个分组列

Quarter1 <- Quarter1 %>%
     mutate(grp = case_when(stock %in% 
          c("CSCO", "IBM", "INTC", "MSFT") ~ "TechIndustry",
      stock %in% c("JNJ", "MRK") ~ "PharmIndustry",
      stock %in% c("AXP", "JPM", "TRV") ~ "FinanceIndustry",
      stock %in% c("HD", "WMT", "PG", "KO") ~ "RetailIndustry"))
1%
变异(grp=情况_,当(库存百分比)
c(“CSCO”、“IBM”、“INTC”、“MSFT”)~“TechIndustry”,
%c(“JNJ”、“MRK”)~“医药工业”中的库存百分比,
%c(“AXP”、“JPM”、“TRV”)~“金融业”中的股票百分比,
%c(“HD”、“WMT”、“PG”、“KO”)~“零售业”)中的库存百分比

非常感谢您!它起作用了
dplyr::filter(Quarter_1, stock %in% c("CSCO", "IBM", "INTC", "MSFT"))
Quarter1 <- Quarter1 %>%
     mutate(grp = case_when(stock %in% 
          c("CSCO", "IBM", "INTC", "MSFT") ~ "TechIndustry",
      stock %in% c("JNJ", "MRK") ~ "PharmIndustry",
      stock %in% c("AXP", "JPM", "TRV") ~ "FinanceIndustry",
      stock %in% c("HD", "WMT", "PG", "KO") ~ "RetailIndustry"))