[r] add lsi, var feature selection

[r] add lsi, var feature selection #71