R -> 创建具有重复值的数据集
R -> creating data set with repetitive values
我得到了解决以下问题的方法:
create a dataset holding the Turnover (runif 500;1000) integer values for your 4 Sales representatives for the last 4 years each salesperson selling 4 different products (Mars, Snickers, Bounty, Milkeyway); additioanlly add a column with the integer CostofSales (runif 50;150) finally calculate the Earnings in an own column. Combine all values into a dataframe
所以我做到了:
Years <- rep(c(2021:2018),16)
Years
Sales <- rep(c("Chris","Lucas","Cara","Bia"),16)
View(Sales)
Product <- rep(c("Mars","Snickers","Bounty","Milkway"),16)
Product
Turnover <- c(runif(64,500,1000))
Turnover
df <- data.frame(Years,Sales,Product,Turnover)
View(df)
但是 'dataframe' 搞砸了:
谁能帮帮我?谢谢
也许这就是您想要的
Years <- rep(c(2021:2018), each=16)
Sales <- rep(rep(c("Chris","Lucas","Cara","Bia"), each=4), 4)
Product <- rep(c("Mars", "Snickers", "Bounty", "Milkway"), 16)
Turnover <- runif(64, 500, 1000)
df <- data.frame(Years,Sales,Product,Turnover)
df[c(4, 8, 12, 16, 20, 24, 28, 32, 36), ]
# Years Sales Product Turnover
# 4 2021 Chris Milkway 964.8695
# 8 2021 Lucas Milkway 799.1933
# 12 2021 Cara Milkway 613.6976
# 16 2021 Bia Milkway 970.3118
# 20 2020 Chris Milkway 598.2047
# 24 2020 Lucas Milkway 951.0657
# 28 2020 Cara Milkway 537.1925
# 32 2020 Bia Milkway 720.0880
# 36 2019 Chris Milkway 759.2236
我得到了解决以下问题的方法:
create a dataset holding the Turnover (runif 500;1000) integer values for your 4 Sales representatives for the last 4 years each salesperson selling 4 different products (Mars, Snickers, Bounty, Milkeyway); additioanlly add a column with the integer CostofSales (runif 50;150) finally calculate the Earnings in an own column. Combine all values into a dataframe
所以我做到了:
Years <- rep(c(2021:2018),16)
Years
Sales <- rep(c("Chris","Lucas","Cara","Bia"),16)
View(Sales)
Product <- rep(c("Mars","Snickers","Bounty","Milkway"),16)
Product
Turnover <- c(runif(64,500,1000))
Turnover
df <- data.frame(Years,Sales,Product,Turnover)
View(df)
但是 'dataframe' 搞砸了:
谁能帮帮我?谢谢
也许这就是您想要的
Years <- rep(c(2021:2018), each=16)
Sales <- rep(rep(c("Chris","Lucas","Cara","Bia"), each=4), 4)
Product <- rep(c("Mars", "Snickers", "Bounty", "Milkway"), 16)
Turnover <- runif(64, 500, 1000)
df <- data.frame(Years,Sales,Product,Turnover)
df[c(4, 8, 12, 16, 20, 24, 28, 32, 36), ]
# Years Sales Product Turnover
# 4 2021 Chris Milkway 964.8695
# 8 2021 Lucas Milkway 799.1933
# 12 2021 Cara Milkway 613.6976
# 16 2021 Bia Milkway 970.3118
# 20 2020 Chris Milkway 598.2047
# 24 2020 Lucas Milkway 951.0657
# 28 2020 Cara Milkway 537.1925
# 32 2020 Bia Milkway 720.0880
# 36 2019 Chris Milkway 759.2236