안녕하세요?
교수님 책에서 소개해주신 R markdown을 따라 해보고 있는데, ztable을 출력하면 첨부한 이미지와 같이 나와서 몇 시간째 씨름 중입니다.
어떻게 하면 해결할 수 있을까요?
Comment 4
-
cardiomoon
2019.08.23 08:07
-
UnuDIo
2019.08.23 15:10
교수님, 항상 감사합니다.
그런데 말씀하신 대로 {r, results='asis'}만 넣으면 전과 동일하게 나오고,
---
title: "Project A"
author: "Noob"
date: "8/22/2019"
output:
html_document: default
pdf_document:
includes:
in_header: header.tex
word_document: default
---
```{r}
knitr::opts_chunk$set(echo = TRUE)
```
## Brief Method
Anti-Ly-6G antibody injection.
```{r}
library(moonBook)
library(ztable)
library(dplyr)
library(magrittr)
```
```{r}
setwd("~/Data/Statistics/R/Project/Leukopenia")
```
```{r}
Ly6G <- read.csv("Ly6G-data.csv", na.strings = c("NA","#N/A"), stringsAsFactors = FALSE, header = TRUE)
```
```{r}
summary(Ly6G)
```
```{r, results='asis'}
```
```{r}
Ly6G$Group1 = factor(Ly6G$Group, levels = c("Placebo", "Anti-Ly-6G"))
z <- mytable(Group ~ TTO + Area + Length, data = Ly6G, method = 1, digits = 1, exact = TRUE, catMethod = 2, max.ylev = 0)
zt <- ztable(z, caption = "Table 1. All animals.", cgroup = c("Placebo", "Anti-Ly-6G")) %>%
addSigColor(level = 0.05, bg = "yellow", color = "red")
print(zt, type = "html")
```
print.ztable(zt, type = "html")까지 넣으면 아래와 같은 오류가 납니다.
Error in print.ztable(zt, type = "html") : could not find function "print.ztable" Calls: <Anonymous> ... handle -> withCallingHandlers -> withVisible -> eval -> eval Execution halted
어떻게 해보면 좋을까요?
-
cardiomoon
2019.08.23 15:42
pdf 를 원하시는건가요? html을 원하시는 건가요?
```{r, results='asis'}
Ly6G$Group1 = factor(Ly6G$Group, levels = c("Placebo", "Anti-Ly-6G"))
z <- mytable(Group ~ TTO + Area + Length, data = Ly6G, method = 1, digits = 1, exact = TRUE, catMethod = 2, max.ylev = 0)
zt <- ztable(z, caption = "Table 1. All animals.", cgroup = c("Placebo", "Anti-Ly-6G")) %>%
addSigColor(level = 0.05, bg = "yellow", color = "red")
print(zt, type = "html")
```
-
UnuDIo
2019.08.23 23:33
공부하는 중이라 하나씩 해보고 있는데, 어느 쪽도 안 되어서요....
이번에는 html로 출력하려던 것이었습니다.
No. | Subject | Author | Date |
---|---|---|---|
1234 | 안녕하세요 에러 관련 문의드립니다 [1] | 화이팅 | 2023.09.19 |
1233 | 선형회귀분석 시 보정변수 사용 관련 질문드립니다. [2] | 전한울 | 2023.09.18 |
1232 | 그래프 관련 문의드립니다. | nanak | 2023.09.14 |
1231 | 영수증 메일로 받을수 있을까요? [1] | 딸기공주 | 2023.09.13 |
1230 | mycsv 관련 문의드립니다. [1] | 도삼 | 2023.09.12 |
1229 | matched group 을 대상으로 stratified cox | saga | 2023.09.06 |
1228 | IPTW 시 SMD 계산 관련 여쭙습니다. | 장한나 | 2023.09.04 |
1227 | 회귀분석 관련 문의드립니다. [2] | 전한울 | 2023.09.04 |
1226 | PSM matching 실행시 disconnected 됩니다... [1] | 맹구모션 | 2023.08.25 |
1225 | 메타분석_출간오류분석 관련 질문드립니다. [2] | 블루레몬 | 2023.08.21 |
1224 | plot 문의 드립니다. | 1122 | 2023.08.20 |
1223 | semMediation 설치문의 [2] | 마술샘 | 2023.08.11 |
1222 | 로지스틱 회귀분석 문의드립니다. [2] | JKJ | 2023.08.09 |
1221 | 지출 문의 드립니다. [1] | 블루레몬 | 2023.08.08 |
1220 | autoReg 실행 중 에러 [1] | pkjsdf123 | 2023.08.08 |
1219 | 영수증 처리 [1] | britnepak | 2023.07.28 |
1218 | multipleROC 커브 글을 따라가다 궁금한 것이 생겨서 질문드립니다. [2] | rgppwls | 2023.07.20 |
1217 | disconnected from server 오류 [2] | JKJ | 2023.07.13 |
1216 | mytable에서 변수 순서와 ztable적용시 변수가 숫자로 변형 [1] | 둥니맨 | 2023.07.12 |
1215 | box plot 시 X 축 label이 다 나오지 않아 질문드립니다. [2] | 난둥 | 2023.07.03 |
R code chunk부분에 results='asis' 를 추가하셔요. 예를 들어 다음과 같이 하시면 됩니다.,
```{r, results='asis'}
print.ztable(...)
```