美文网首页数据科学与R语言
R语言-06.2删除数据过少的数据组

R语言-06.2删除数据过少的数据组

作者: 周一ing | 来源:发表于2019-10-04 17:07 被阅读0次

根据sample列的值分组，删除每一组小于2条的数据组

deleteuniquelines <- function(x) {# x为输入的数据框
        stand.col <- x$sample # 设根据x的sample进行删除操作
        count <- table(stand.col)
        if (all(count < 2)) stop("no repeated records")
        else {
                ind <- sapply(stand.col, function(t) ifelse(count[as.character(t)] > 1, TRUE, FALSE))
        }
        return(x[ind, ])
}
a<-deleteuniquelines(maindata) #402组

相关文章

网友评论

    本文标题：R语言-06.2删除数据过少的数据组

    本文链接：https://www.haomeiwen.com/subject/jsdspctx.html

    延伸阅读

    深度阅读

    • 您也可以注册成为美文阅读网的作者，发表您的原创作品、分享您的心情！

    栏目导航

    热点阅读

    数据科学与R语言

    关于我们|服务条款|联系我们|R语言-06.2删除数据过少的数据组|投稿指南|网站地图|RSS订阅|排版工具|手机版

    提供经典美文摘抄,优美散文欣赏,现代诗歌精选,短篇小说,心情随笔,表白情书范文,故事会在线阅读欣赏

    Copyright © 2014-2023 Haomeiwen.com All Rights Reserved. 好美文阅读网 版权所有

    备案信息：桂公网安备 45052102000051号 · 桂ICP备13007215号-3

    本站所收录作品、热点评论等信息部分来源互联网，目的只是为了系统归纳学习和传递资讯

    所有作品版权归原创作者所有，与本站立场无关，如不慎侵犯了你的权益，请联系我们告知，我们将做删除处理！