function里面的 逻辑字符 怎么引用

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

1. x=sample(LETTERS[1:26],100,T)
   
2. prob=function(y){
   
3.         count=sum(x==y)
   
4.         total=length(x)
   
5.         count/total
   
6. }

复制代码

这个function里面，怎么才能正确引用A,B,C,D之类的，才能得到 那个字母再x里面的比例呢?

谢谢！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：function TIO Fun CTI UNC

1. > x=sample(LETTERS[1:26],100,T)
   
2. > prob=function(y){
   
3. + count=sum(x==y)
   
4. + total=length(x)
   
5. + count/total
   
6. + }
   
7. > prob("A")
   
8. [1] 0.03
   
9. > prob("B")
   
10. [1] 0.08
    
11. > for (i in LETTERS[1:26]) print(prob(i))
    
12. [1] 0.03
    
13. [1] 0.08
    
14. [1] 0.03
    
15. [1] 0.01
    
16. [1] 0.01
    
17. [1] 0.02
    
18. [1] 0.03
    
19. [1] 0.01
    
20. [1] 0.06
    
21. [1] 0.08
    
22. [1] 0.05
    
23. [1] 0.04
    
24. [1] 0.08
    
25. [1] 0.05
    
26. [1] 0.01
    
27. [1] 0.01
    
28. [1] 0.03
    
29. [1] 0.03
    
30. [1] 0.02
    
31. [1] 0.04
    
32. [1] 0.06
    
33. [1] 0.07
    
34. [1] 0.05
    
35. [1] 0.04
    
36. [1] 0.04
    
37. [1] 0.02

复制代码

是的

其实非常简单

我傻了一下。。。

谢谢！