Mercurial > repos > greg > insect_phenology_model
comparison utils.R @ 139:0440f1c7715e draft
Uploaded
author | greg |
---|---|
date | Wed, 21 Nov 2018 11:31:11 -0500 |
parents | 3f1c93b0e8c6 |
children | b06b3881ecf0 |
comparison
equal
deleted
inserted
replaced
138:3f1c93b0e8c6 | 139:0440f1c7715e |
---|---|
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 tick_labels[tick_index] = label_str; | 144 if (date_interval) { |
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 } | |
145 last_tick = i; | 150 last_tick = i; |
146 } else if (i == prepend_end_norm_row) { | 151 } else if (i == prepend_end_norm_row) { |
147 # Add a tick for the end of the 30 year normnals data | 152 # Add a tick for the end of the 30 year normnals data |
148 # that was prepended to the year-to-date data. | 153 # that was prepended to the year-to-date data. |
149 label_str = "End prepended 30 year normals"; | 154 label_str = "End prepended 30 year normals"; |