☰

Verwendung von Knitr und Latex-Problem

tag-icon • tag-icon r knitr
Verwendung von Knitr und Latex-Problem

Ich führe derzeit eine CES-Funktionsschätzung mit dem micEconCES-Paket in R durch. Ich möchte die Ergebnisse der Schätzung in meine Latex-Datei integrieren, aber ich kriege es einfach nicht hin. Dies ist die vereinfachte Version in R. Ich möchte, dass sie ungefähr so ​​aussieht

Bildbeschreibung hier eingeben

Dies ist der Code, den ich in R verwende. Wenn ich den Code Schritt für Schritt in R eingebe, erhalte ich die gewünschte Ausgabe. Wenn ich ihn jedoch in die Rnw-Datei einfüge, erhalte ich Fehlermeldungen.

\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}

Aber wenn ich diesen Code als PDF kompiliere, erhalte ich die Fehlermeldung:

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

Was mache ich falsch?

Antwort1

Wahrscheinlich hast du vergessen, die Bibliothek für die Funktion zu laden read_excel. In der ersten Zeile bekommst du eine eindeutige Fehlermeldung:

konnte Funktion "readexcel"nicht finden

Sie müssen library(readxl)(falls es der Paketname ist) in Ihr Dokument einfügen. Sie können einen zusätzlichen Codeblock hinzufügen, nachdem %starting the R codeSie alle Bibliotheken, die Sie für das Dokument benötigen, an einem Ort geladen haben.

<<Load library>>
library(readxl)
# Other packages
@

verwandte Informationen