我正在尝试使用sapply或lapply来简化下面的多个ifelse代码(仍然无法区分它们)。df$Point <- ifelse(df$Placement_v2 <= 1, 10,ifelse(df$Placement_v2<= 25, 8,
ifelse(df$Placement_v2 <
浏览 1提问于2017-07-08得票数 1
回答已采纳
1回答
从列表中删除元素
、、
如何从R中的列表中删除元素？想象一下这个工作流：my_list <- lapply(1:10, function(x) x)my_list_boolean<- sapply(my_list, function(x) ifelse(x%%2>0,F,T))是否有一种解决方案不需要使用for循环并
浏览 1提问于2018-11-03得票数 0
回答已采纳
1回答
下面的if语句在major_allele列中搜索REF的匹配项，反之亦然。问题是，它总是计算为true，如带星号的行所示。上面链接的前一个答案指出，ifelse总是生成一个向量，所以我猜它只会查看第一个观察值，计算结果为true，然后在所有行中执行相同的操作。但是，我希望它逐行进行。(lapply(rsid.tmp$REF, grepl, || (sapply(lapply(rsid.tmp警告消息:在if (
浏览 26提问于2021-07-29得票数 1
回答已采纳
该函数使用grepl在c列中查找d的内容，反之亦然，然后应该从ifelse中创建一个包含'yes‘和'no’语句的新列。我需要在测试后返回“yes”和“no”，但这是给出错误的部分。,"ff","ee", "gf")
newfunction <- function(x, col1, col2, col3, col4){ifelse(((sapply(<e
浏览 10提问于2021-08-01得票数 2
回答已采纳
以下是我要做的事：我通常使用嵌套的ifelse语句随机分配等级，如下所示。40条嵌套的ifelse语句可能开始显得有点过火。
是否有一种更优雅/更快/更小的代码方法来使用dplyr或data.table，可能与apply、lapply、sapply等一起使用？我尝试过使用data.tab
浏览 4提问于2017-12-27得票数 1
回答已采纳
1回答
data =data.frame(sapply(data,function(x) ifelse((x==999),NA,x)))
你能解释一下函数(X).，x是如何工作的吗？
浏览 7提问于2022-02-27得票数 0
回答已采纳
那些有20个或更少的唯一值的人，我想要像现在这样转换成因子，那些有更多的，我想转换成使用gtools::quantcut的因素。 e = sample(1:30, 100 ,replace=T))
function(x) ifelse</em
浏览 0提问于2014-04-25得票数 0
回答已采纳
我使用提到的safe.ifelse函数编写了一个函数。(df1$month1 > as.Date('2013-10-01'), as.Date('2013-10-01'), df1$month1) }df1[,dateCols1] <- sapply(df1[,dateCols1], capDate)
或
浏览 1提问于2013-10-22得票数 0
回答已采纳
2回答
我试图从一个列表中提取元素，用NA替换NULL，我的简单ifelse和is.null语句似乎将子列表截断为第一个元素。到底怎么回事？place_of_death="Amherst, Massachusetts, US")
sapply(1:2, function(x) biography.list[[x]]$spouse) ## gets correct results
sapply<
浏览 4提问于2020-03-20得票数 1
回答已采纳
3回答
循环和
、、
当我使用lapply函数时，结果不是我想要的。我只想要列表中的一个元素。NULLif(x[i] > 0.5 p.value[i] <- (1-x[i])*2lapply的结果是相同结果的组合。
浏览 5提问于2021-09-20得票数 1
回答已采纳
4回答
$`0`$item3
$`1`$item1[1] 56
numeric(0) 我在这个列表上使用了sapply函数，但得到了一个错误： 参数的'type‘(列表)无效 如何像其他项目一样将所有numeric(0)转换为0？
浏览 53提问于2021-04-13得票数 0
回答已采纳
3回答
我在创建一个循环时遇到了麻烦。我的意图是，循环将看到值下降的位置，并给该值另一个名称。下面是我想要做的事情的一个例子：b<-rnorm(10,0,1)
for (i in 1:nrow(testing2)){ if (testing2[i,j]>1) testing2[i,j]<-"More"
else if (testing2[i,j]&l
浏览 9提问于2014-03-04得票数 2
回答已采纳
2回答
我在R中遇到了一个问题，在这里我可以对列表中的元素运行ifelse语句，但是一旦我将ifelse语句放到lapply函数中，它就不再工作了。1 m13 133 m15 155 m17 17如果一个dataframe有一个奇数行，我希望R给它贴上如果dataframe有偶数行，我只想让R输出相同的数据。我希望输出是一个列表。
当我编写独立
浏览 0提问于2017-04-06得票数 4
回答已采纳
1回答
下面是一个脚本，用于重现我在使用执行并发请求的RCurl构建爬虫时所面临的问题。目的是下载数千个网站的内容，以便进行统计分析。因此，解决方案应扩大规模。curl) } complete(multiHandle)In addition: Warning message:
浏览 4提问于2014-09-28得票数 6
回答已采纳
5回答
我已经尝试过使用grepl(" ", df)，但是这允许我替换每个包含空白的条目，而不仅仅是那些由空白组成的条目。
浏览 2提问于2019-05-24得票数 1
回答已采纳
我在编码和R方面非常新手，所以如果这是愚蠢的，我很抱歉。您知道如何在sapply中保留一些格式吗？下面是我想要更新的代码部分： helpText(h3("FAQ")),
浏览 5提问于2020-08-01得票数 0
回答已采纳
2回答
我创建了一个自定义函数，将值替换为NA，以了解函数在R中是如何工作的： if(x == -99) {survey1 <- lapply(survey1, replacewithna)
目前，我有以下错误：“if (x == -99)中的==错误”{：
浏览 4提问于2022-10-05得票数 1
回答已采纳
2回答
我想使用sapply函数和ifelse语句来确定日期的差异。任何时候，差别都是负值，我希望R用值1来代替它。
我这样做如下。sapply(df$end.date, function(x) { ifelse(df$end.date>start_date, as.integer(length(seq(from=start_date
浏览 4提问于2017-04-10得票数 0
回答已采纳
我是R的初学者，在此之前，我经常在执行宏时使用for循环。然而，在学习了R之后，我学会了这个有趣的命令sapply& lapply，但是我想知道如何使用这个命令来执行多个循环。例如，当我使用For循环执行同步作业时，我在for循环中嵌套了for循环，如下所示： for j in ~~~~~ }
在学习了sapply & lapply</
浏览 2提问于2015-05-17得票数 0
我有以下代码来在数据框架中添加新列：{ lParm = paste0(parm,"_LOG") if(parm %in% names(dataSubset)){
if(grep("0",row[parm],f
浏览 0提问于2014-02-19得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
云直播活动推荐
腾讯云开发者
