`大家好，
我正在嘗試在我的資料中創建一個均值變數。
rp我想要每個月和地區（由 組成code）乘以我的資料框中的年數的平均值。
這是我正在處理的一些資料：
structure(list(month = c("JAN", "FEV", "MAR", "ABR", "MAI", "JUN", "JUL", "AGO", "SET", "OUT", "NOV", "DEZ", "JAN", "FEV"), year = c(2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L, 2004L), code = c("AL", "AL", "AL", "AL", "AL", "AL", "AL", "AL", "AL", "AL", "AL", "AL", "AM", "AM"), region = c("NE", "NE", "NE", "NE", "NE", "NE", "NE", "NE", "NE", "NE", "NE", "NE", "N", "N"), month_num = c(1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 12L, 1L, 2L), rp = c(151.351257324219, 150.433822631836, 145.326431274414, 144.790817260742, 139.691024780273, 138.706481933594, 137.455856323242, 145.046249389648, 136.064834594727, 135.468658447266, 134.540267944336, 137.561904907227, 142.4482421875, 141.584777832031)), row.names = c(NA, 14L), class = "data.frame")
我對 R 相當陌生，并且無法找到解決方案。我想在我的資料集中創建一個新列，而不是簡單地計算它。我想使用該解決方案來創建圖表。
任何幫助表示贊賞。
更新：我現在已經創建mean_rp（平均實際價格）并將其添加到資料框中。我現在正在嘗試創建一個圖表，顯示不同regions 的平均實際價格如何隨時間變化。我以前用state資料和幾種工具做過這個，這些工具很有效。這是使用的代碼：
dc$date <- as.Date(dc$date) plot(subset(dc, code == "RS")$date, subset(dc, code == "RS")$rp, type = "l", xlab = "Time", ylab = "Real price of cement", ylim=c(0,400)) points(subset(dc, code == "MG")$date, subset(dc, code == "MG")$rp, type = "l",col="red") points(subset(dc, code == "MT")$date, subset(dc, code == "MT")$rp, type = "l",col="yellow") points(subset(dc, code == "PE")$date, subset(dc, code == "PE")$rp, type = "l",col="blue")
#Instruments: Shades of grey dc$date <- as.Date(dc$date) points(subset(dc, code == "RS")$date, subset(dc, code == "RS")$rip_diesel/20, type = "l", col="darkgrey") points(subset(dc, code == "RS")$date, subset(dc, code == "RS")$rip_fueloil/10, type = "l", col="darkgrey") points(subset(dc, code == "RS")$date, subset(dc, code == "RS")$rip_vegcoal,type = "l", col="darkgrey") legend("topleft",legend = c("Price of Cement - RS", "Price of Cement - MG","Price of Cement - MT", "Price of Cement - PE", "Price of Diesel (/20)","Price of Fuel Oil (/10)","Price of Veg. Oil"),lty = c(1,1,1,1,1,1,1),col = c("black", "yellow", "blue", "dark grey", "grey", "lightgrey"),inset = c(0.15,0))
這導致了一個看起來像這樣的圖表：
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/506967.html