如何在 R 中模拟这些标准
How to simulate these criteria in R
我想创建两列,分别标记为组和大小。该组有字母 A 到 E。大小列的范围是 10 到 100。
我想生成 300 个样本并根据大小为组获取以下数据:
E= Sizes less than 20
D= Sizes of an SD +/- of the mean Size
C= Sizes between 40-59
B= Sizes between 60-79
A=Sizes greater than 79
感谢您的帮助
是
sampleSizes <- sample(10:100,300,replace = TRUE)
groups <- rep("No group",length(sampleSizes))
#criteria E
groups[sampleSizes < 20] <- "E"
#criteria D
meanSize <- mean(sampleSizes)
SD <- sd(sampleSizes)
groups[sampleSizes >= meanSize-SD & sampleSizes <= meanSize+SD] <- "D"
#criteria C
groups[sampleSizes >= 40 & sampleSizes <= 59] <- "C"
#criteria B
groups[sampleSizes >= 60 & sampleSizes <= 79] <- "B"
#criteria A
groups[sampleSizes > 79] <- "A"
groups
你想要什么?
要获得所需的两列,只需将它们以 data.frame 的形式并排放置,例如
result <- data.frame(Sizes = sampleSizes, Group = groups)
我想创建两列,分别标记为组和大小。该组有字母 A 到 E。大小列的范围是 10 到 100。
我想生成 300 个样本并根据大小为组获取以下数据:
E= Sizes less than 20
D= Sizes of an SD +/- of the mean Size
C= Sizes between 40-59
B= Sizes between 60-79
A=Sizes greater than 79
感谢您的帮助
是
sampleSizes <- sample(10:100,300,replace = TRUE)
groups <- rep("No group",length(sampleSizes))
#criteria E
groups[sampleSizes < 20] <- "E"
#criteria D
meanSize <- mean(sampleSizes)
SD <- sd(sampleSizes)
groups[sampleSizes >= meanSize-SD & sampleSizes <= meanSize+SD] <- "D"
#criteria C
groups[sampleSizes >= 40 & sampleSizes <= 59] <- "C"
#criteria B
groups[sampleSizes >= 60 & sampleSizes <= 79] <- "B"
#criteria A
groups[sampleSizes > 79] <- "A"
groups
你想要什么?
要获得所需的两列,只需将它们以 data.frame 的形式并排放置,例如
result <- data.frame(Sizes = sampleSizes, Group = groups)