写在前面
科研真是我做过正反馈周期最长的事情啊…两年的坚持,隐忍,不知正反馈何时能够到来。昨天,自己努力半年的东西付之一炬,被导师全盘否定。回头看看这两年,除了每天累死累活,早出晚归,为自己的课题焦虑、绞尽脑汁,也没有留下什么东西。健身没有坚持,自己的兴趣爱好全部放弃,没有出去旅行,简书、B站无限期拖更……(唯一让我想起有所安慰的是两年里坚持每周做家教,作为科研放松之余也通过自己的劳动有了稳定收入)
昨天的事情让我明白,不能把自己的全部精力都押在一件事情上,就像买股票一样,24/7投入工作会让自己走火入魔、患得患失。今后,不但工作要干,提升自己全方位素质的活动更不能落下。我的生活里太需要一些正反馈了!
所以从今天起,这个文集每天分享一个小的R语言技巧,不求深度,但求坚持!目标日更100天!
R语言的向量化取最大/最小值(pmin/pmax)
今天分享的技巧是R语言的向量化比较(取最大最小值)
例如:
> a <- 1:10
> b <- sample(1:10)
> min(a,b)
[1] 1
使用一般的min(a,b)只能得到全局的最小值,而如果想要得到每个位置两两比较的最小值,应该使用pmin()函数,即“‘parallel’ maxima (or minima)”。这个技巧在使用dplyr的mutate生成新列的时候非常常用。
参考
https://stackoverflow.com/questions/35329883/mutate-to-create-minimum-in-each-row