# HG changeset patch
# User greg
# Date 1513873023 18000
# Node ID cc517e44244e065db436ba4ae4c2ede49c2d63e7
# Parent  623f81b08310956d3c0b47df29515c62ff9368f9
Uploaded

diff -r 623f81b08310 -r cc517e44244e ideas_genome_tracks.R
--- a/ideas_genome_tracks.R	Thu Dec 21 10:35:49 2017 -0500
+++ b/ideas_genome_tracks.R	Thu Dec 21 11:17:03 2017 -0500
@@ -108,6 +108,7 @@
     # are multiple .para files.  See the comments in the for loop
     # below.
     data_frame <- read.table(para_files[1], comment="!", header=T);
+	color_hex_code <- create_heatmap(data_frame);
     ######
     base_track_file_name <- paste(tracks_dir, hub_name, sep="");
     cells = create_track(input_dir_state, chrom_len_file, base_track_file_name);
@@ -134,7 +135,7 @@
             ######
             # This is for future use since there is currently only a single .para file.
             # data_frame <- read.table(para_files[i], comment="!", header=T);
-            color_hex_code <- create_heatmap(data_frame);
+            # color_hex_code <- create_heatmap(data_frame);
         } else {
             # Use the selected color for the current state.
             color_hex_code <- s_colors[i];