Mercurial > repos > davidvanzessen > argalaxy_tools
comparison report_clonality/RScript.r @ 42:9a47d7a552d6 draft
Uploaded
| author | davidvanzessen |
|---|---|
| date | Thu, 26 Oct 2017 09:08:37 -0400 |
| parents | a70dbcfa5d8a |
| children | 2325074a8461 |
comparison
equal
deleted
inserted
replaced
| 41:a70dbcfa5d8a | 42:9a47d7a552d6 |
|---|---|
| 46 # ---------------------- Data preperation ---------------------- | 46 # ---------------------- Data preperation ---------------------- |
| 47 | 47 |
| 48 print("Report Clonality - Data preperation") | 48 print("Report Clonality - Data preperation") |
| 49 | 49 |
| 50 inputdata = read.table(infile, sep="\t", header=TRUE, fill=T, comment.char="", stringsAsFactors=F) | 50 inputdata = read.table(infile, sep="\t", header=TRUE, fill=T, comment.char="", stringsAsFactors=F) |
| 51 | |
| 52 inputdata$Sample = as.character(inputdata$Sample) | |
| 51 | 53 |
| 52 | 54 |
| 53 print(paste("nrows: ", nrow(inputdata))) | 55 print(paste("nrows: ", nrow(inputdata))) |
| 54 | 56 |
| 55 setwd(outdir) | 57 setwd(outdir) |
