within函数赋值是仅在函数括号内生效吗

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. > manager <- c(1,2,3,4,5)
   
2. > date <- c("10/24/08","10/28/08","10/1/08","10/12/08","5/1/09")
   
3. > country <- c("US","US","UK","UK","UK")
   
4. > gender <- c("M","F","F","M","F")
   
5. > age <- c(32,45,25,39,99)
   
6. > q1 <- c(5,3,3,3,2)
   
7. > q2 <- c(4,5,5,3,2)
   
8. > q3 <- c(5,2,5,4,1)
   
9. > q4 <- c(5,5,5,NA,2)
   
10. > q5 <- c(5,5,2,NA,1)
    
11. > leadership <- data.frame(manager,date,country,gender,age,q1,q2,q3,q4,q5,stringsAsFactors = FALSE)
    
12. > leadership$age[leadership$age == 99] <- NA
    
13. > within(leadership,{
    
14. + agecat <-NA
    
15. + agecat[age > 75] <- "Elder"
    
16. + agecat[age >= 55 & age <= 75] <- "Middle Aged"
    
17. + agecat[age < 55] <- "Young"})
    
18.   manager     date country gender age q1 q2 q3 q4 q5 agecat
    
19. 1       1 10/24/08      US      M  32  5  4  5  5  5  Young
    
20. 2       2 10/28/08      US      F  45  3  5  2  5  5  Young
    
21. 3       3  10/1/08      UK      F  25  3  5  5  5  2  Young
    
22. 4       4 10/12/08      UK      M  39  3  3  4 NA NA  Young
    
23. 5       5   5/1/09      UK      F  NA  2  2  1  2  1   <NA>
    
24. > leadership
    
25.   manager     date country gender age q1 q2 q3 q4 q5
    
26. 1       1 10/24/08      US      M  32  5  4  5  5  5
    
27. 2       2 10/28/08      US      F  45  3  5  2  5  5
    
28. 3       3  10/1/08      UK      F  25  3  5  5  5  2
    
29. 4       4 10/12/08      UK      M  39  3  3  4 NA NA
    
30. 5       5   5/1/09      UK      F  NA  2  2  1  2  1

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：within With Thin Leadership leaders

也就是想更改数据框用于之后的计算不能用within函数？