Mercurial > repos > iuc > isoformswitchanalyzer

comparison IsoformSwitchAnalyzeR.R @ 4:512d6462f2ce draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/isoformswitchanalyzer commit fa9a0a8f71ce6da2cd790474454776a9601968c3
author iuc
date Tue, 30 May 2023 08:39:23 +0000
parents 02a77166b29a
children b3f292d9f35d
comparison
equal deleted inserted replaced
3:02a77166b29a 4:512d6462f2ce
891 sep = "\t", 891 sep = "\t",
892 col.names = TRUE, 892 col.names = TRUE,
893 row.names = FALSE 893 row.names = FALSE
894 ) 894 )
895 895
896 write.table(
897 SwitchList$switchConsequence,
898 file = "switchConsequence_fulldata.tsv",
899 quote = FALSE,
900 sep = "\t",
901 col.names = TRUE,
902 row.names = FALSE
903 )
904
905 write.table(
906 SwitchList$AlternativeSplicingAnalysis,
907 file = "switchSplicing_fulldata.tsv",
908 quote = FALSE,
909 sep = "\t",
910 col.names = TRUE,
911 row.names = FALSE
912 )
913
914 write.table(
915 SwitchList$isoformFeatures,
916 file = "IsoformFeatures.tsv",
917 quote = FALSE,
918 sep = "\t",
919 col.names = TRUE,
920 row.names = FALSE
921 )
896 922
897 ### Volcano like plot: 923 ### Volcano like plot:
898 outputFile <- file.path(getwd(), "volcanoPlot.pdf") 924 outputFile <- file.path(getwd(), "volcanoPlot.pdf")
899 925
900 pdf( 926 pdf(