Как мне превратить это в репер - PullRequest
0 голосов
/ 20 июня 2019

Из-за локального csv-файла он пытается превратить это в представление. Он говорит, что файл не найден в каталоге. Любая помощь велика спасибо!

library(tidyverse)
library(ggplot2)
library(dplyr)
library(RColorBrewer)
library(cronR)
library(miniUI)
library(shiny)
library(shinyFiles)
library(pdftools)
library(tm)
library(readtext)
library(stringr)
library(plyr)
library(lubridate)
library(openxlsx)
library(rio)
library(reprex)


RAO <- readr::read_csv(file = "RateAddOnsExcel.csv")
RAO <- as.data.frame(read.csv(file = "RateAddOnsExcel.csv", header=TRUE, sep = ","))
RAO$X10.01.18 <- NULL
RAO$...4 <- NULL
RAO$...5 <- NULL
RAO$Quarter. <- NULL
names(RAO)[1:13] = c("ProviderName","AIMNumber", "ChainName", "RateEffectiveDate", "ComponentTotal", 
                     "VentAddOn", "QualityAddOn", "SpecialCareUnitAddOn", "AssessmentAddOn", 
                     "SelectedExpenditureAddOn", "RateReduction", "CaseMixRate", "CaseMixAssessment")
RAO[grepl("Myers", RAO$ProviderName),]
RAO[!grepl("Index", RAO$ProviderName),]

View(RAO)
reprex::reprex(outfile = NA)
...