[Bio] / FigKernelScripts / ma_pipeline.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/ma_pipeline.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3, Thu May 6 02:25:33 2010 UTC revision 1.4, Sat May 15 23:38:58 2010 UTC
# Line 25  Line 25 
25      || die "Where is $orgD/Features/peg/tbl?";      || die "Where is $orgD/Features/peg/tbl?";
26    
27  &run("make_probes_to_genes $exp_ed/probes $orgD/contigs $orgD/Features/peg/tbl $exp_ed/peg.probe.table $exp_ed/probe.occ.table 2> $exp_ed/problems");  &run("make_probes_to_genes $exp_ed/probes $orgD/contigs $orgD/Features/peg/tbl $exp_ed/peg.probe.table $exp_ed/probe.occ.table 2> $exp_ed/problems");
28    &run("remove_multiple_occurring_probes $exp_ed/peg.probe.table $exp_ed/probe.occ.table > $exp_ed/peg.probe.table.no.multiple");
29  system "pushd $exp_ed";  system "pushd $exp_ed";
30  chdir $exp_ed;  chdir $exp_ed;
31    
# Line 33  Line 33 
33  &run("$FIG_Config::bin/call_coregulated_clusters_on_chromosome $genome $exp_ed/raw_data.tab > $exp_ed/coregulated.clusters 2> $exp_ed/stderr.coregulated.clusters");  &run("$FIG_Config::bin/call_coregulated_clusters_on_chromosome $genome $exp_ed/raw_data.tab > $exp_ed/coregulated.clusters 2> $exp_ed/stderr.coregulated.clusters");
34  &run("$FIG_Config::bin/make_coreg_conjectures_based_on_subsys  $genome $exp_ed/raw_data.tab > $exp_ed/coregulated.subsys   2> $exp_ed/stderr.coregulated.subsys");  &run("$FIG_Config::bin/make_coreg_conjectures_based_on_subsys  $genome $exp_ed/raw_data.tab > $exp_ed/coregulated.subsys   2> $exp_ed/stderr.coregulated.subsys");
35  &run("cat $exp_ed/coregulated.clusters $exp_ed/coregulated.subsys | cut -f1 | $FIG_Config::bin/merge_gene_sets > $exp_ed/merged.clusters");  &run("cat $exp_ed/coregulated.clusters $exp_ed/coregulated.subsys | cut -f1 | $FIG_Config::bin/merge_gene_sets > $exp_ed/merged.clusters");
36  &run("Rscript $FIG_Config::bin/Pipeline.R $exp_ed/merged.clusters 0.7 > $exp_ed/comments.by.Pipeline.R");  &run("Rscript $FIG_Config::bin/Pipeline.R $exp_ed/pegs.always.on $exp_ed/merged.clusters 0.7 > $exp_ed/comments.by.Pipeline.R");
37  &run("Rscript $FIG_Config::bin/SplitGeneSets.R $exp_ed/merged.clusters 0.7 > $exp_ed/split.clusters");  &run("Rscript $FIG_Config::bin/SplitGeneSets.R $exp_ed/merged.clusters 0.7 > $exp_ed/split.clusters");
38  system "popd";  system "popd";
39    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3