Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/84.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
替换R中的表值?_R - Fatal编程技术网

替换R中的表值?

替换R中的表值?,r,R,以下是我的代码: Female=(1) Male=(2) R <- sapply(list(Female, Male), length) Distribution = sample(c(Female, Male), size = 100, prob = rep(c(0.2, 0.8) / R, R), replace = TRUE) summary(Distribution) Distribution[Distribution == "

以下是我的代码:

Female=(1)
Male=(2)
R <- sapply(list(Female, Male), length)

Distribution = sample(c(Female, Male),
        size = 100,
        prob = rep(c(0.2, 0.8) / R, R),
        replace = TRUE)

summary(Distribution)

Distribution[Distribution == "1"] <- "F"
Female=(1)
男性=(2)

R取决于。。。如果要使用系数:

dd <- as.factor(Distribution)
levels(dd) <-  c('F', 'M')
还可以使用命名向量:

v <- c(F = 1, M = 2)
names(v[Distribution])

v我认为您必须首先将向量的类型更改为字符:

Distribution <- as.character(Distribution)
Distribution[Distribution == "1"] <- "F"
Distribution[Distribution == "2"] <- "M"

分布将其作为一个因子变量:

factor(Distribution, levels=1:2, labels=c("F", "M"))

@卡尔:谢谢!!非常有用。达到了我的目的谢谢你的帮助!但是你没有选择我的答案!;)
Distribution <- as.character(Distribution)
Distribution[Distribution == "1"] <- "F"
Distribution[Distribution == "2"] <- "M"
factor(Distribution, levels=1:2, labels=c("F", "M"))