R语言学习中遇到的问题！！！

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

求教：R中生成数据，筛选出一组数字满足如下要求：十位上的数字与百位上的数字之和能整除2，并将满足条件的数字及其对应的指针输出

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：R语言学习 R语言 语言学 筛选出

1. myfun <- function(x) {
   
2.   stopifnot(is.numeric(x))
   
3.   names(x) <- seq_along(x)
   
4.   new.x <- x[abs(x) >= 100]
   
5.   ten <- floor(new.x / 10) %% 10
   
6.   hundred <- floor(new.x /100) %% 10
   
7.   y <- new.x[(ten + hundred) %% 2 == 0]
   
8.   return(y)
   
9. }
   
10. 
    
11. myfun(c(100, 10, 101, 203.4, -203.4, 2003, 2030.55))
    
12.      4      5      6
    
13. 203.4 -203.4 2003.0

复制代码

乐天天12300 发表于 2021-4-11 10:55

我懂了！谢谢！！！