Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(panstarrs) library(dplyr) library(data.table)
coords <- ps1_mast_resolve('KQ Uma') coords
df_cone <- ps1_cone( coords$ra, coords$decl, r_arcmin = 0.01, table = 'mean', release = 'dr2' ) # tidyverse approach df_cone |> dplyr::select(dplyr::matches('[grizy]MeanPSFMag$')) # or if you prefer data.table approach df_cone[, .SD, .SDcols = grepl('[grizy]MeanPSFMag$', names(df_cone))]
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.