如何修改aaa函数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

1. aaa<-function(dset,group) {
   
2.   if (length(levels(group))==2) {
   
3.     print("ccc")
   
4.   }
   
5.   else {
   
6.     print("ddd")
   
7.   }
   
8. }
   
9. 
   
10. aaa(dset=dat,group="grp1")

复制代码

不修改aaa(dset=dat,group="grp1") ，修改函数内部，谢谢！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：如何

aaa(dset=dat,group="grp1")

如果你非要  group="grp1"，character类型，  要获取grp1这个对象， 可以 get("grp1")
及length(levels(get(group)))==2

levels(x)
x 为object   且为factor型

jmpamao 发表于 2014-5-19 09:36
aaa(dset=dat,group="grp1")

如果你非要  group="grp1"，character类型，  要获取grp1这个对象， 可以 g ...

采用get("grp1")时，保证grp1为dat中的列呢？

dxystata 发表于 2014-5-19 12:03
采用get("grp1")时，保证grp1为dat中的列呢？

"dat$grp1"

或者  attach（dat)