An experiment in Kenya has been exploring the influence of large herbivores on plants.
Check to see if TREE_SURVEYS.txt is in your workspace.
If not, download TREE_SURVEYS.txt.
Use read_tsv from the readr package to read in the data using the following command:
trees <- read_tsv("TREE_SURVEYS.txt")
trees data frame with a new column named canopy_area that contains
the estimated canopy area calculated as the value in the AXIS_1 column
times the value in the AXIS_2 column.
Show output of the trees data frame with just the SURVEY, YEAR, SITE, and canopy_area columns.canopy_area on the x axis and HEIGHT on the y
axis. Color the points by TREATMENT and plot the points for each value in
the SPECIES column in a separate subplot. Label the x axis “Canopy Area
(m)” and the y axis “Height (m)”. Make the point size 2.AXIS_1
and AXIS_2 that are over 20 and update the data frame. Then remake the graph.group_by, summarize, and n to make a data frame with YEAR,
SPECIES, and an abundance column that has the number of individuals in
each species in each year. Print out this data frame.geom_line in addition to
geom_point) with YEAR on the x axis and abundance on the y axis with
one subplot per species. To let you seen each trend clearly let the scale for
the y axis vary among plots by adding scales = "free_y" as an optional argument to facet_wrap.