3-Dimensional

Markdown Author: Jessie Bell, 2023

oceansData <- read.csv("Ocean Indexes.csv")


suppressWarnings((plot_ly(oceansData,
        x = ~NPGO,
        y = ~UPW,
        z = ~Clam,
        color = ~Clam, 
        filename="r-docs/knitr-example") |>
  add_markers() |>
  layout(scene = list(xaxis = list(title = 'NPGO'),
                    yaxis = list(title = 'UPW'),
                    zaxis = list(title = 'Clam'))) |>
  layout(show.legend = T)))

## Warning: 'layout' objects don't have these attributes: 'show.legend'
## Valid attributes include:
## '_deprecated', 'activeshape', 'annotations', 'autosize', 'autotypenumbers', 'calendar', 'clickmode', 'coloraxis', 'colorscale', 'colorway', 'computed', 'datarevision', 'dragmode', 'editrevision', 'editType', 'font', 'geo', 'grid', 'height', 'hidesources', 'hoverdistance', 'hoverlabel', 'hovermode', 'images', 'legend', 'mapbox', 'margin', 'meta', 'metasrc', 'modebar', 'newshape', 'paper_bgcolor', 'plot_bgcolor', 'polar', 'scene', 'selectdirection', 'selectionrevision', 'separators', 'shapes', 'showlegend', 'sliders', 'smith', 'spikedistance', 'template', 'ternary', 'title', 'transition', 'uirevision', 'uniformtext', 'updatemenus', 'width', 'xaxis', 'yaxis', 'barmode', 'bargap', 'mapType'