Mercurial > repos > jfb > difference_finder
comparison all stuff/Difference finder for GalaxyP 2-21-20.R @ 10:78f16bc92ba6 draft
Uploaded
| author | jfb |
|---|---|
| date | Fri, 21 Feb 2020 16:37:08 -0500 |
| parents | 033dd86d3e0c |
| children |
comparison
equal
deleted
inserted
replaced
| 9:033dd86d3e0c | 10:78f16bc92ba6 |
|---|---|
| 242 write.table(x=FTLoutputmatrix2, | 242 write.table(x=FTLoutputmatrix2, |
| 243 file=First_unshared_motifs_table, | 243 file=First_unshared_motifs_table, |
| 244 quote=FALSE, sep=",", | 244 quote=FALSE, sep=",", |
| 245 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 245 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 246 | 246 |
| 247 columnalheader<-c("Accession Numbers",as.character(Firstsubbackfreq[1:35,1])) | 247 columnalheader<-c(as.character(Firstsubbackfreq[1:36,1])) |
| 248 columnalheader<-matrix(columnalheader,nrow = 1) | 248 columnalheader<-matrix(columnalheader,nrow = 1) |
| 249 write.table(x=columnalheader, | 249 write.table(x=columnalheader, |
| 250 file=First_unshared_subbackfreq, | 250 file=First_unshared_subbackfreq, |
| 251 quote=FALSE, sep=",", | 251 quote=FALSE, sep=",", |
| 252 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 252 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 260 write.table(x=EmptySubHeader, | 260 write.table(x=EmptySubHeader, |
| 261 file=First_unshared_motifs_table, | 261 file=First_unshared_motifs_table, |
| 262 quote=FALSE, sep=",", | 262 quote=FALSE, sep=",", |
| 263 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 263 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 264 | 264 |
| 265 columnalheader<-c("Accession Numbers",as.character(Firstsubbackfreq[1:35,1])) | 265 columnalheader<-c(as.character(Firstsubbackfreq[1:36,1])) |
| 266 columnalheader<-matrix(columnalheader,nrow = 1) | 266 columnalheader<-matrix(columnalheader,nrow = 1) |
| 267 write.table(x=columnalheader, | 267 write.table(x=columnalheader, |
| 268 file=First_unshared_subbackfreq, | 268 file=First_unshared_subbackfreq, |
| 269 quote=FALSE, sep=",", | 269 quote=FALSE, sep=",", |
| 270 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 270 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 329 write.table(x=D835Youtputmatrix2, | 329 write.table(x=D835Youtputmatrix2, |
| 330 file=Second_unshared_motifs_table, | 330 file=Second_unshared_motifs_table, |
| 331 quote=FALSE, sep=",", | 331 quote=FALSE, sep=",", |
| 332 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 332 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 333 | 333 |
| 334 columnalheader<-c("Accession Numbers",as.character(Firstsubbackfreq[1:35,1])) | 334 columnalheader<-c(as.character(Firstsubbackfreq[1:36,1])) |
| 335 columnalheader<-matrix(columnalheader,nrow = 1) | 335 columnalheader<-matrix(columnalheader,nrow = 1) |
| 336 write.table(x=columnalheader, | 336 write.table(x=columnalheader, |
| 337 file=Second_unshared_subbackfreq, | 337 file=Second_unshared_subbackfreq, |
| 338 quote=FALSE, sep=",", | 338 quote=FALSE, sep=",", |
| 339 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 339 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 347 write.table(x=EmptySubHeader, | 347 write.table(x=EmptySubHeader, |
| 348 file=Second_unshared_motifs_table, | 348 file=Second_unshared_motifs_table, |
| 349 quote=FALSE, sep=",", | 349 quote=FALSE, sep=",", |
| 350 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 350 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |
| 351 | 351 |
| 352 columnalheader<-c("Accession Numbers",as.character(Firstsubbackfreq[1:35,1])) | 352 columnalheader<-c(as.character(Firstsubbackfreq[1:36,1])) |
| 353 columnalheader<-matrix(columnalheader,nrow = 1) | 353 columnalheader<-matrix(columnalheader,nrow = 1) |
| 354 write.table(x=columnalheader, | 354 write.table(x=columnalheader, |
| 355 file=Second_unshared_subbackfreq, | 355 file=Second_unshared_subbackfreq, |
| 356 quote=FALSE, sep=",", | 356 quote=FALSE, sep=",", |
| 357 row.names=FALSE,col.names = FALSE, na="", append=TRUE) | 357 row.names=FALSE,col.names = FALSE, na="", append=TRUE) |