R/magselect.R

Defines functions magselect

magselect <-
function(magnitude) {
  data(resstar)
  resstar <- resstar
  res <- resstar[resstar[, 3] < magnitude,]
  res <- na.omit(res)
  return(res)
}
helixcn/ephem documentation built on March 31, 2021, 5:45 a.m.