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"; |
