Итак, я сейчас делаю оценку функции CES, используя пакет micEconCES в R. Я хочу включить результаты оценки в свой файл latex, но, похоже, не могу заставить его работать. Это упрощенная версия в R. Я хочу, чтобы она выглядела примерно так
Это код, который я использую в R. Если я ввожу код шаг за шагом в R, то получаю желаемый результат, но если вставляю его в файл Rnw, то получаю сообщения об ошибках.
\documentclass{article}
\begin{document}
#starting the R code
<<>>=
#reading in my data set from excel and changing a couple columns to
numeric
DATA_FOR_2<- read_excel("~/Documents/DATA FOR 2.xlsx", col_types =
c("text", "text", "text","text", "text", "numeric", "numeric",
"numeric", "numeric", "numeric", "numeric", "numeric", "numeric",
"numeric", "numeric", "numeric", "numeric", "numeric", "numeric",
"numeric", "numeric"))
#cutting out some unneeded rows
mydata <- DATA_FOR_2[-c(46:62), ]
#using the micEconCES code to do the Kmenta approximation
cesKmenta <- cesEst( yName = "gddp", xNames = c( "capiital", "labora"
), data = mydata, method = "Kmenta", vrs = TRUE )
#calling summary stats
summary(cesKmenta)
#plotting the results
compPlot ( mydata$gddp, fitted( cesKmenta ), xlab = "actual values",
ylab = "fitted values" )
@
\end{document}
Но когда я компилирую этот код в PDF, я получаю сообщение об ошибке:
DATA_FOR_2<- read_excel("~/Documents/DATA FOR 2.xlsx", col_types = c("text", "text", "text","text", "text", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric", "numeric"))## Error in eval(expr, envir, enclos): konnte Funktion "readexcel"nicht finden
mydata <- DATA_FOR_2[-c(46:62), ]## Error in eval(expr, envir, enclos): Objekt 'DATAFOR2' nicht gefunden
cesKmenta <- cesEst( yName = "gddp", xNames = c( "capiital", "labora" ), data = mydata, method = "Kmenta", vrs = TRUE )## Error in eval(expr, envir, enclos): konnte Funktion "cesEst" nicht finden
summary(cesKmenta)## Error in summary(cesKmenta): Objekt 'cesKmenta' nicht gefunden
compPlot ( mydata$gddp, fitted( cesKmenta ), xlab = "actual values",ylab = "fitted values" )## Error in eval(expr, envir, enclos): konnte Funktion "compPlot"nicht finden1
Что я делаю не так?
решение1
Вы, вероятно, забыли загрузить библиотеку для функции read_excel
. У вас есть четкое сообщение об ошибке в первой строке:
konnte Funktion "readexcel"nicht finden
Вам нужно добавить library(readxl)
(если это имя пакета) в ваш документ. Вы можете добавить дополнительный кусок кода после %starting the R code
загрузки всех библиотек, которые вам нужны для документа в одном месте
<<Load library>>
library(readxl)
# Other packages
@