#to add to SFBcontact:

SFBcontact$datamanager_email2 = NA

SFBcontact$datamanager_email2 [SFBcontact$SFBnumber =="TRR 135"] <- "thorsten.arendt@uni-marburg.de"	
#write.csv(SFBcontact, "neurosfb_no1315.tsv",sep = "/t")

# not working, commit before and clean by hand ?
write.table(SFBcontact, file='neurosfb_no1315.tsv', quote=FALSE, sep='\t')

+49 6421 28-23555