Mercurial > repos > ecology > ecoregion_eco_map
comparison recup_liste_taxon.R @ 2:374555fc30bd draft default tip
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/Ecoregionalization_workflow commit 5d48df67919fbc9d77b98a8243d438c397f61a0e
| author | ecology |
|---|---|
| date | Thu, 21 Mar 2024 14:05:21 +0000 |
| parents | b38b954b92b9 |
| children |
comparison
equal
deleted
inserted
replaced
| 1:b38b954b92b9 | 2:374555fc30bd |
|---|---|
| 80 have_model <- have_model %>% filter(!str_ends(Taxa, "sp.1|sp[0-9]")) | 80 have_model <- have_model %>% filter(!str_ends(Taxa, "sp.1|sp[0-9]")) |
| 81 | 81 |
| 82 #extraction of the have_model object | 82 #extraction of the have_model object |
| 83 write.table(have_model,file = "have_model.tsv", sep="\t", quote = F, row.names = F) | 83 write.table(have_model,file = "have_model.tsv", sep="\t", quote = F, row.names = F) |
| 84 | 84 |
| 85 #getting list of taxa for next if not using worms | 85 #getting list of taxa for next step if not using worms |
| 86 list_taxon = have_model3$Taxa | 86 list_taxon = have_model3$Taxa |
| 87 write.table(list_taxon, file= "list_taxa.txt", quote = F, row.names = F, col.names = F) | 87 write.table(list_taxon, file= "list_taxa.txt", quote = F, row.names = F, col.names = F) |
| 88 | 88 |
| 89 #getting the final list to submit to worms | 89 #getting the final list to submit to worms |
| 90 liste_taxon = have_model2$Taxa | 90 liste_taxon = have_model2$Taxa |