Skip to content

C
clinicaltrials
Commit 205f77f7 authored by david Chavalarias's avatar david Chavalarias
Browse files
Options

R script

parent e57b99ab
Hide whitespace changes
Inline Side-by-side
Showing with 18 additions and 5 deletions
Rscripts/Process_CT_for_Gargantext.nb.html
View file @ 205f77f7
This source diff could not be displayed because it is too large. You can view the blob instead.
Rscripts/coronalib.R
View file @ 205f77f7
......@@ -34,7 +34,7 @@ garg_export_raw_treatments<- function(df,filename) {
x$authors=df$First.author
x$title=df$Trial.registration.number
x$source=df$Funding
x$abstract=paste(toupper(df$Pharmacological.treatment)," . ",df$Treatment.type," . ",str_replace_all(tolower(df$Treatment.name),"[[+]]"," ; "))
x$abstract=paste(toupper(df$Pharmacological.treatment)," . ",str_replace_all(tolower(df$Treatment.type),"[[+]]"," ; ")," . ",str_replace_all(tolower(df$Treatment.name),"[[+]]"," ; "))
y <- filter(x,x$publication_year!="NA")
write.table(y, file = paste("output/gargCSV_Treatments_raw_",filename,".csv",sep = ""), sep = "\t",row.names = FALSE)
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment