我如何将其变成代表

时间:2019-06-20 17:45:27

标签: r reprex

由于使用本地csv文件,因此难以将其转换为reprex。 它说在目录中找不到该文件。任何帮助都非常感谢!

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)

0 个答案:

没有答案