R/data.R

In sunniraleigh/wetry: This Will Do Something

#' Italian Restaurants Dataset
#' @docType data
#' @source \url{http://gattonweb.uky.edu/sheather/book/docs/datasets/nyc.csv}
#' @format An object of class spec_tbl_df with 168 rows and 7 columns
#' \describe{
#' \item{restaurant}{restaurant name}
#' \item{price}{price in US dollars of a meal for two with a drink}
#' \item{food}{food Zagat rating, scale 1-30}
#' \item{decor}{decor Zagat rating, scale 1-30}
#' \item{service}{service Zagat rating, scale 1-30}
#' \item{east}{if restaurant is located east of 5th avenue, true(1) or false(0)}
#' }
#' @examples
#' ## Fit price as a function of food
#' lm(price ~ food, data = italian)
#'
#' ## Calculate mean price
#' mean(italian$price)
#'
#' ## filter for resturant prices over $30
#' if (require(dplyr)) {
#'   dplyr::filter(italian, price > 30)
#' }
"italian"