Analysis of Storm Data cross the United States based on data from the National Oceanic and Atmospheric Administration (NOAA). This analysis is part of a course on Coursera (Reproducible Research at JHU), hence this report and its results are only for study purposes and don't form any statement of mine.

library(plotly) Prediction_map_3D = Prediction_map[!is.na( Prediction_map$Prediction), ] plot_ly(Prediction_map_3D, x = ~X, y = ~Y, z = ~Prediction, type = "scatter3d", mode = "markers", marker = list(size = 3, opacity = 0.8, color = ~Prediction, colorscale = "Viridis")) %>% layout(scene = list(xaxis = list(title = "Latitude", showgrid = TRUE, gridwidth = 10), yaxis = list(title = "Longitude", showgrid = TRUE, gridwidth = 10), zaxis = list(title = "d18O"),tickvals = rev(seq(min(Prediction_map_3D$Prediction), max(Prediction_map_3D$Prediction), length.out = 5)),camera = list(eye = list(x = 0, y = -0.1, z = 2))), showlegend = FALSE)

Avaliar o monitoramento de animais domésticos no Campus Marco Zero da Universidade Federal do Amapá.