match()和unique()R包连用

下面这样一条代码，我都看来半天，还一直整不明白，真的才发现注释每个代码是有多么重要。

  lhm <- slice(lhm,match(unique(lhm$sciname),lhm$sciname))

首先是unique()函数，将lh变量中的重复项删除

第二步，通过match()函数，将非重复项从含有重复项的向量中提取出来。

最终，通过slice()函数从lhm数据集中，根据sciname向量，提取出非重复的行