Loops tree growth (solution)

Exercise

Output solution


Attaching package: 'dplyr'

The following objects are masked from 'package:stats':

    filter, lag

The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union

Warning: One or more parsing issues, call `problems()` on your data frame for details,
e.g.:
  dat <- vroom(...)
  problems(dat)

Rows: 7508 Columns: 16

── Column specification ────────────────────────────────────────────────────────
Delimiter: "\t"
chr (7): SITE, TREATMENT, PLOT, SPECIES, DEAD, MEASUREMENT, STEMS
dbl (9): SURVEY, YEAR, BLOCK, ORIGINAL_TAG, NEW_TAG, HEIGHT, AXIS_1, AXIS_2,...

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

[1] 2.9

Warning: Returning more (or less) than 1 row per `summarise()` group was deprecated in
dplyr 1.1.0.
ℹ Please use `reframe()` instead.
ℹ When switching from `summarise()` to `reframe()`, remember that `reframe()`
  always returns an ungrouped data frame and adjust accordingly.

`summarise()` has grouped output by 'TREATMENT', 'ORIGINAL_TAG'. You can
override using the `.groups` argument.

# A tibble: 1,529 × 3
# Groups:   TREATMENT, ORIGINAL_TAG [1,528]
   TREATMENT ORIGINAL_TAG growth
   <chr>            <dbl>  <dbl>
 1 MEGA                64 -2.28 
 2 MEGA                65 NA    
 3 MEGA                87  1.43 
 4 MEGA                88 -0.5  
 5 MEGA                89  1.08 
 6 MEGA                90  2.08 
 7 MEGA                91  2.2  
 8 MEGA                92  0.825
 9 MEGA                93  1.23 
10 MEGA               123  0.375
# ℹ 1,519 more rows

`stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

Warning: Removed 159 rows containing non-finite outside the scale range
(`stat_bin()`).

Warning: Returning more (or less) than 1 row per `summarise()` group was deprecated in
dplyr 1.1.0.
ℹ Please use `reframe()` instead.
ℹ When switching from `summarise()` to `reframe()`, remember that `reframe()`
  always returns an ungrouped data frame and adjust accordingly.

`summarise()` has grouped output by 'TREATMENT', 'ORIGINAL_TAG'. You can
override using the `.groups` argument.
`stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

Warning: Removed 159 rows containing non-finite outside the scale range
(`stat_bin()`).

Warning: Returning more (or less) than 1 row per `summarise()` group was deprecated in
dplyr 1.1.0.
ℹ Please use `reframe()` instead.
ℹ When switching from `summarise()` to `reframe()`, remember that `reframe()`
  always returns an ungrouped data frame and adjust accordingly.

`summarise()` has grouped output by 'SPECIES', 'ORIGINAL_TAG'. You can override
using the `.groups` argument.
`stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

Warning: Removed 110 rows containing non-finite outside the scale range
(`stat_bin()`).