R 过滤行后的表函数问题

在这种情况下，我需要根据集群创建餐厅类型的交叉列表。我选择了三种类型的餐厅，印度的，韩国的和比萨饼。 然而，还有许多其他类型的餐厅。因此，我使用filter（）来选择目标

rest_3cui <- rest1 %>% filter(Cuisine %in% c('Indian', 'Korean', 'Pizza'))

table(rest_3cui[, c('Cuisine', 'cluster')])

其中包含太多其他无用的消息，而不是只有三个目标。 我想要的表格应该是：

                 cluster
Cuisine           1 2 3
Indian            4 0 1
Korean            2 2 2
Pizza             1 0 5

---

希望有人能帮上忙。

这主要是因为

烹饪

属于

因素

类型。考虑这个例子使用<代码> MTCAS < /COD>数据< /P>

df <- mtcars
df$cyl <- factor(df$cyl)
table(df[, c("cyl", "am")])

#   am
#cyl  0  1
#  4  3  8
#  6  4  3
#  8 12  2

或者我们希望将其保留为

因子

，再次使用

因子

，以便删除未使用的级别

df2$cyl <- factor(df2$cyl)

---

在您的情况下，您可以在

过滤器

之后添加

液滴液位

，它应该可以正常工作

library(dplyr)

rest_3cui <- rest1 %>% 
               filter(Cuisine %in% c('Indian', 'Korean', 'Pizza')) %>% 
               droplevels()

库（dplyr）
其余3%的
过滤器（烹饪%c（'Indian'，'Korean'，'Pizza'））%>%
液滴（）

df2$cyl <- as.character(df2$cyl)
table(df2[, c("cyl", "am")])
#   am
#cyl  0  1
#  6  4  3
#  8 12  2

df2$cyl <- factor(df2$cyl)

df2$cyl <- droplevels(df2$cyl)

library(dplyr)

rest_3cui <- rest1 %>% 
               filter(Cuisine %in% c('Indian', 'Korean', 'Pizza')) %>% 
               droplevels()