marcelcosta
/
CitFuns
1
0
Fork 0
Code Issues 4 Pull Requests Projects Releases Wiki Activity
Reppo for internal functions.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
77 Commits
1 Branch
485 KiB
Tree: a4483c84e6
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'a4483c84e6'
${ noResults }
CitFuns/R/md2csv.R

7 lines
212 B
Raw Normal View History

Adding md2csv and tab2md functions.
1 week ago
​
​
​
​
​
​
 
  1. md2csv<-function(text, rm_blank=T){
  2.   text<-strsplit(text, "\n")[[1]]
  3.   text<-gsub("^[ |]*|[|][ ]*$","",text)
  4.   if(rm_blank){text<-gsub(" ","",text)}
  5.   text<-gsub("[|]",",",text)
  6.   return(cat(text,sep = "\n"))
  7. }