library(FITSio)
library(dplyr)
# Read the 0FGL FITS file into a data frame
FGL0 <- tbl_df(readFrameFromFITS("data-raw/gll_psc3month_BSL_v2.fit", hdu = 1))
FGL0$CLASS1 = gsub(" ", "", FGL0$CLASS1)
save(FGL0, file = "data/FGL0.rdata", compress = "xz")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.