Mercurial > repos > ecology > pampa_presabs

comparison FunctExeCalcPresAbsGalaxy.r @ 4:07b081730994 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"planemo upload for repository https://github.com/ColineRoyaux/PAMPA-Galaxy commit cd938a05cb066b16f2518159fa0ff5e3ed8a2b2b"
author ecology
date Mon, 26 Apr 2021 16:04:47 +0000
parents 8d8aec182fb1
children
comparison
equal deleted inserted replaced
3:8d8aec182fb1 4:07b081730994
67 res$presence_absence <- calc_pres_abs_f(res, nb_name = "number") 67 res$presence_absence <- calc_pres_abs_f(res, nb_name = "number")
68 res <- create_year_location(res) 68 res <- create_year_location(res)
69 69
70 #Save dataframe in a tabular format 70 #Save dataframe in a tabular format
71 filename_pres_abs <- "TabPresAbs.tabular" 71 filename_pres_abs <- "TabPresAbs.tabular"
72 write.table(res, filename_pres_abs, row.names = FALSE, sep = "\t", dec = ".", fileEncoding = "UTF-8") 72 write.table(res, filename_pres_abs, row.names = FALSE, quote = FALSE, sep = "\t", dec = ".", fileEncoding = "UTF-8")
73 cat(paste("\nWrite table with presence/absence. \n--> \"", filename_pres_abs, "\"\n", sep = "")) 73 cat(paste("\nWrite table with presence/absence. \n--> \"", filename_pres_abs, "\"\n", sep = ""))