第十天：使用R语言对数据某变量进行分组

最新推荐文章于 2024-05-22 18:25:18 发布

VIP文章努力打怪中

最新推荐文章于 2024-05-22 18:25:18 发布

阅读量2.1k

点赞数 2

文章标签： r语言开发语言

本文链接：https://blog.csdn.net/HHHHHHHUUUYY/article/details/128149337

版权

今天学会了几种对数据某变量进行分组的方法

示例数据，来自我自己的数据。

1.编写函数进行分组

library(tidyverse)
A <- openxlsx::read.xlsx("data.xlsx")
options(max.print=2000)
YX <-  function(X){
   n = nrow(A)
  res = vector("character",n)
  
  for(i in 1:n){
      if(A$age[i]<30){
         res[i] = "青年"
      } else if(A$age[i] >= 30&A$age[i]<50){
           res[i] = "中年"
    } else if(A$age[i] >= 50){
               res[i] = "中老年"
             } 
  }
   res_1 <- cbind(data.frame(res),A)
   res_1
}

A_1 <- YX(A$age)

head(A,6)

   res res id age gender week1 week histology surgery Tumorlocation T1 N G1 RM
1 中老年      1  61      1     5    0         1       2             1  3 0  3  1
2 中老年      2  67      1     4    0         1       1             2  4 0  3  1
3 中老年      3  55      1     4    0         1       1             2  3 1  3  1
4 中老年      4  52      1     4    0