Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/list/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 识别列表子集中的异常值_R_List_Split_Outliers - Fatal编程技术网

R 识别列表子集中的异常值

R 识别列表子集中的异常值,r,list,split,outliers,R,List,Split,Outliers,请原谅我的术语不准确。例如,我将一个数据帧拆分为我想要的子集,但根据Rstudio,结果是一个列表。我被这些术语弄糊涂了,所以我很难在so中找到答案 我的问题是如何应用函数从列表的子集中删除异常值?数据帧中的我的数据(参见2): Id我不知道你到底想在这里做什么,但我很有信心你发布的代码没有做到这一点。。。你期望see2[,1]==“5”实现什么?我认为这可能与前面的问题有关:这个问题缺少拆分代码-可能类似于:split(see2,cumsum(see2[,1]==5))?R的大多数有经验的用户

请原谅我的术语不准确。例如,我将一个数据帧拆分为我想要的子集,但根据Rstudio,结果是一个列表。我被这些术语弄糊涂了,所以我很难在so中找到答案

我的问题是如何应用函数从列表的子集中删除异常值?数据帧中的我的数据(参见2):


Id我不知道你到底想在这里做什么,但我很有信心你发布的代码没有做到这一点。。。你期望
see2[,1]==“5”
实现什么?我认为这可能与前面的问题有关:这个问题缺少拆分代码-可能类似于:
split(see2,cumsum(see2[,1]==5))
?R的大多数有经验的用户都尊重阻止他们响应此请求的数据。这不是一个困难的操作,但我们希望听到一个理由,大多数人会考虑统计弊端。@这些都是标准,所以理论上,它们应该是已知值的+/- 5%。我需要知道小瓶中是否有污染,或者仪器是否有故障。@user2770184:删除数据绝对不是标准的目的。
Id <- c(5,34,55,84,105,134,155,5,34,55,84,5,34,55,84,105,134,155,184,5,34,55,84,105,134,    155,184)  
A <- c(230185,1472449,870581,269359,527566,937805,1361685,209868,282024,244880,228502, 129072,143122,89994,106535,108124,97962,75841,97366,96382,64324,66834,60787,79516,92829,120894,62763)    
df <- data.frame(Id, A)
see2 <- df[c(1, seq(3, nrow(df), 3)),]
see2[,1] == "5"
result <- split(see2, cumsum(see2[,1]=="5"))