R 转换和绘制两个数字和频率

这是我的数据集-

我试图描绘出每种教育类型说“是”的次数

首先，我从数据集中找出谁说是的

yest <- subset(bank, y == "yes")

---

我需要找出教育和人们说“是”之间是否存在相关性。

plyr

已经退休，你可以查看

dplyr

。对于

education

的每个唯一值，您可以使用

n（）

计算它们的频率，使用

sum

计算

的“是”数

library(dplyr)

data <- bank %>%
          group_by(education) %>%
          summarise(freq = n(), 
                    freqofyes = sum(y == 'yes'))

data
#  education            freq freqofyes
#  <chr>               <int>     <int>
#1 basic.4y             4176       428
#2 basic.6y             2292       188
#3 basic.9y             6045       473
#4 high.school          9515      1031
#5 illiterate             18         4
#6 professional.course  5243       595
#7 university.degree   12168      1670
#8 unknown              1731       251

库（dplyr）
数据%
组别(教育)%>%
总结（freq=n（），
frequeofyes=sum（y=='yes'））
数据
#教育频率是
#                      
#1.4y 4176 428基本型
#2.6y 2292 188
#3.9y 6045 473基本型
#4.高中95151031
#5文盲18 4
#6.专业课程5243595
#7.大学学位12168 1670
#8未知1731 251
非常感谢。我没有学过dplyr，也不知道你会吹管。因此，当我试图绘制它时，
ggplot（data=data，aes（x=freq，y=freqofyes，color=bank$education））+geom_point（）
。它给了我这个错误
错误：美学必须是长度1或与数据（8）：颜色相同。我正在尝试将bank$education放入，因为我的图表现在没有显示x轴的频率是多少？为什么要使用
bank$education
，因为它已经存在于
数据中了。这是有效的：
ggplot（data=data，aes（x=freq，y=frequeofyes，color=education））+geom_point（）
我认为它是
colname
子集
数据的一部分。我尝试了你的函数，但是它返回时说
乐趣中的错误（X[[I]]，…）：未找到对象“education”
它对我很好，没有任何错误，并显示了情节。尝试重新启动R并再次运行它。如果您仍然有问题，可以作为一个新问题提问。我试过了，现在无法加载子数据<代码>错误：`n（）`只能在dplyr谓词中使用。
。因为这是我得到的错误。我会把一切都擦干净，重新开始，如果没有，我会像你建议的那样问一个问题。非常感谢你的帮助。
x           freq        freqofyes
basic.4y      400        10

library(dplyr)

data <- bank %>%
          group_by(education) %>%
          summarise(freq = n(), 
                    freqofyes = sum(y == 'yes'))

data
#  education            freq freqofyes
#  <chr>               <int>     <int>
#1 basic.4y             4176       428
#2 basic.6y             2292       188
#3 basic.9y             6045       473
#4 high.school          9515      1031
#5 illiterate             18         4
#6 professional.course  5243       595
#7 university.degree   12168      1670
#8 unknown              1731       251