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
.