Mercurial > repos > greg > insect_phenology_model
comparison utils.R @ 138:3f1c93b0e8c6 draft
Uploaded
author | greg |
---|---|
date | Wed, 21 Nov 2018 11:20:17 -0500 |
parents | dbcd6ed8e3ee |
children | 0440f1c7715e |
comparison
equal
deleted
inserted
replaced
137:97a56ff8f32a | 138:3f1c93b0e8c6 |
---|---|
139 # Add a tick for the day on which the number of insects | 139 # Add a tick for the day on which the number of insects |
140 # per replication is 0. | 140 # per replication is 0. |
141 label_str = "Number insects is 0"; | 141 label_str = "Number insects is 0"; |
142 tick_index = get_tick_index(i, last_tick, ticks, tick_labels, tick_sep); | 142 tick_index = get_tick_index(i, last_tick, ticks, tick_labels, tick_sep); |
143 ticks[tick_index] = i; | 143 ticks[tick_index] = i; |
144 if (date_interval) { | 144 tick_labels[tick_index] = label_str; |
145 # Append the day to label_str | |
146 tick_labels[tick_index] = paste(label_str, day, sep=" "); | |
147 } else { | |
148 tick_labels[tick_index] = label_str; | |
149 } | |
150 last_tick = i; | 145 last_tick = i; |
151 } else if (i == prepend_end_norm_row) { | 146 } else if (i == prepend_end_norm_row) { |
152 # Add a tick for the end of the 30 year normnals data | 147 # Add a tick for the end of the 30 year normnals data |
153 # that was prepended to the year-to-date data. | 148 # that was prepended to the year-to-date data. |
154 label_str = "End prepended 30 year normals"; | 149 label_str = "End prepended 30 year normals"; |