Не удалось найти функцию "ggsave". Не уверен, почему это происходит.Я посмотрел на несколько других источников и не смог найти решение.В крайнем случае
library(tidyverse)
apollo_tbl <- read_csv("apollo.csv", col_names = TRUE)
plot1 <- ggplot(data = apollo_tbl, mapping = aes(x = covpercent, y = dayDifference)) +
geom_point() +
labs(x = "Cov Percent",
y = "Day Difference",
title = "Add your title here")
ggsave(filename = "apollo_scatter_plot", plot = plot1, device = "png" )