在列中计算值并将其放置在变量R中

Question

因此，我是R的新手，我设法得到一个盒子阴谋。但是我做的是混乱而且效率很低。为了帮助我学习，我希望学习更简单的方法来做我所做的事情。

我会在下面留下我的代码。

food_coded <- subset(data, select=c("comfort_food_reasons_coded")) 
head(food_coded) 
stress <- length(which(food_coded == 1)) 
boredom <- length(which(food_coded == 2)) 
depression <- length(which(food_coded == 3)) 
print(depression) 
hunger<- length(which(food_coded == 4)) 
laziness<- length(which(food_coded == 5)) 
cold_weather<- length(which(food_coded == 6)) 
happiness <- length(which(food_coded == 7)) 
watching_tv<- length(which(food_coded == 8)) 
none <- length(which(food_coded == 9)) 

axis <- c(stress, boredom, depression, hunger, laziness, cold_weather, happiness, watching_tv, none) 
#Time to make a bar graph 
barplot(axis, depression) 

Answer 1

我们需要得到使用table

barplot(table(food_coded))