#R语言怎样一个对多个变量求均值并画图？

#R语言
数据库中有1-6个变量，每个变量的取值范围都是1-5，现在想做的事情是分别对每个变量求出均值，第几个变量作为x，该变量对应的均值作为y，然后画出每个变量和变量对应的均值的折线图，请问要怎么做？

现在已有的代码是：

adult(原数据框)
（qn1-qn6是具体的变量名称）

运行结果及报错内容 运行结果中数据框中没有y值，如图。

也画不出对应的图。

请问有没有人知道这个图应该怎么做？