Р: Как использовать агрегат при расчете значений для столбца по отношению к значениям другого столбца? - PullRequest
0 голосов
/ 04 декабря 2018

Это наше упражнение:

"Для этой задачи вы будете работать с набором данных LifeCycleSavings, поставляемым с R. Этот набор данных показывает соотношение сбережений в разных странах в период между 1960 и 1970 гг. И дает информацию оПроцент населения стран в возрасте до 15 лет и старше 75 лет. a) (3 Pkt.) Рассчитать средние темпы роста располагаемого дохода на процент населения в возрасте до 15 лет в каждой стране. b) (5 Pkt.) Сортируйте только что рассчитанную информацию в соответствии с темпом роста и визуализируйте ее, используя гистограмму. Обязательно правильно маркируйте график. "

Не знаю, так ли это:

LifeCycleSavings = LifeCycleSavings
LifeCycleSavings$ddpi_per_under15 <-(LifeCycleSavings$ddpi/LifeCycleSavings$pop15) * 100

#b
LifeCycleSavings <- LifeCycleSavings[order(LifeCycleSavings[, 6]), ] 

par(mar=c(13, 6, 6, 1));
barplot(LifeCycleSavings$ddpi_per_under15, names=rownames(LifeCycleSavings), las =2,
    xlim=c(0,60), ylim = c(0,100), col = terrain.colors(15),
    main = "average growth rate of disposable income
    per percentage of the population under 15 of each country (1960-1970)",
    xlab = "", ylab = "average growth rate of disposable income 
    per percentage of pop. under 15 (ratio)", font.lab = 2)
    mtext("countries", side=1, line=8, font = 2)

или эта версия является правильным подходом к этой проблеме:

ddpi_per_under15 = aggregate(ddpi~pop15,LifeCycleSavings, mean)
row.names(ddpi_per_under15) = row.names(LifeCycleSavings)

#b

average_growth15_sorted <- ddpi_per_under15[order(ddpi_per_under15$ddpi), ]

barplot(average_growth15_sorted$ddpi, 
    names.arg = rownames(average_growth15_sorted),
    main = "Average growth of the disposable income
    per percentage of the population under 15 of each country", 
    ylab = "Average growth rate", xlab = "", las = 2,
    ylim = c(0,20), col=rainbow(50))

Итак, вопрос требует отношения?Или что означает «за» в данном случае?Спасибо!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...