今天的内容到了数据处理部分
非常感谢这部分讲解，以前不理解的地方理解了不少，get到一些新技能
期待下一课
今天试了表格的转置
笨笨的，百度搜到一个很好用的代码
function(x){x[, apply(x, 2, function(y) any(!is.na(y)))]}
转自：https://www.jianshu.com/p/26edb1b1e6c7
转置以后额外出现一个表头，然后write.csv()去处理删除。然后再把表头第一格改成V1
然后用semi_join() 取了交集。。然后再返回到csv里边去处理
笨笨的 能以后学到在R里边直接处理完
生信星球
