quitar - Ocultar las NA cuando se imprime un marco de datos en knitr

autocad no imprimir borde imagen

Question

Estoy tratando de imprimir una tabla en knitr desde un marco de datos usando xtable. La tabla del ejemplo siguiente tiene las dimensiones 3x7, pero la tercera fila solo tiene un valor, en la segunda columna. El resto de las celdas en la tercera fila son ''NA''.

Cuando compilo el documento, ¿hay una manera de evitar que Knitr imprima los NA en la tercera fila, así que en lugar de NA solo tengo espacio en blanco?

Parece que esta debería ser una solución simple, pero no puedo averiguar dónde / cómo ocultar las AN. ¿Es un cambio que debo realizar en el marco de datos o es una opción xtable o knitr que necesito cambiar?

Ejemplo de código knitr:

/documentclass{article}

<< data1, echo=FALSE,  warning=FALSE, message=FALSE >>=

require(xtable)

  FY.2014 <- 0.019
  FY.2015 <- ((7000)  - (6925.9)) / (6925.9)
  FY.2016 <- ((8000)  - (7000))   / (7000)
  FY.2017 <- ((9000)  - (8000))   / (8000)
  FY.2018 <- ((10000) - (9000))   / (9000)
  FY.2019 <- ((11000) - (10000))  / (10000)

  PC      <- data.frame(FY.2014, FY.2015, FY.2016, FY.2017, FY.2018, FY.2019)
  PC.1    <- paste(round(PC*100, digits=1), "%", sep="")


 FY.2014 <- 130.1
 FY.2015 <- 7000  - 6925.9
 FY.2016 <- 8000  - 7000
 FY.2017 <- 9000  - 8000
 FY.2018 <- 10000 - 9000
 FY.2019 <- 11000 - 10000

 AB      <- data.frame(FY.2014, FY.2015, FY.2016, FY.2017, FY.2018, FY.2019)
 AB.1    <- paste(round(AB , digits = 2))


    FY.2014 <- as.numeric(c(""))
    FY.2015 <- 7242.9
    FY.2016 <- as.numeric(c(""))
    FY.2017 <- as.numeric(c(""))
    FY.2018 <- as.numeric(c(""))
    FY.2019 <- as.numeric(c(""))

    PF      <- data.frame(FY.2014, FY.2015, FY.2016, FY.2017, FY.2018, FY.2019)
    PF.1    <- paste(round(PF , digits = 2))

     FTable  <- rbind( PC.1, AB.1, PF.1)

      rownames(FTable) <- c( ''Percent Change from the Previous Year'', 
                             ''Absolute Change from Previous Year'', 
                             ''December CY13 Forecast'')
      colnames(FTable) <- c( ''FY 2014'', ''FY 2015'', ''FY 2016'', ''FY 2017'', ''FY 2018'',    ''FY 2019'')

@ 

/begin{document}
<<Table 1 , echo=FALSE, eval=TRUE, results=''asis'', fig.width = 5, fig.height = 2,     message=FALSE, fig.align=''center'', warning=FALSE>>=

          xFTable  <- xtable(FTable, big.mark=",")

          print(xFTable) 
@
/end{document}

Answer 1

El truco que uso es un poco de fuerza bruta, pero parece funcionar (en mis casos de uso, eso es):

out <- knitr::kable(...)
cat(gsub(''//bNA//b'', ''  '', out), sep=''/n'')

Answer 2

Puede configurar la opción knitr knitr.kable.na = '''' '''' para espacios en blanco, o cualquier carácter que desee.

```{r echo=FALSE, results=''asis''}
    options(knitr.kable.NA = '''')
    knitr::kable(lowerTri, digits=2)
```