+ # Map fishing effort
+ p1 <- effort_all %>%
+ ggplot() +
+ geom_sf(data = world_shp, fill = '#374a6d', color = '#0A1738',size = 0.1) +
+ geom_sf(data = eezs,color = '#374a6d',alpha = 0.2,fill = NA,size = 0.1) +
+ geom_raster(aes(x=lon_bin,y=lat_bin,fill=log_fishing_hours)) +
+ scale_fill_gradientn(
+ "fishing_hours",na.value = NA,limits = c(1, 5),colours = effort_pal(5)+
错误: unexpected symbol in:
" scale_fill_gradientn(
"fishing_hours"
> labels = c("10","100","1000","10000","100000+"),values = scales::rescale(c(0, 1))) +
错误: 意外的',' in " labels = c("10","100","1000","10000","100000+"),"
> labs(fill = 'Fishing hours (log scale)',
+ title = 'Global fishing effort in 2016') +
+ guides(fill = guide_colourbar(barwidth = 10)) +
+ gfw_theme
这两个报错,我无论怎么修改都改不了,求大神解答,谢谢!!