Hello, Quarto

Meet Quarto

Quarto enables you to weave together content and executable code into a finished document. To learn more about Quarto see https://quarto.org.

Meet the penguins

The penguins data from the palmerpenguins package contains size measurements for 344 penguins from three species observed on three islands in the Palmer Archipelago, Antarctica.

The plot below shows the relationship between flipper and bill lengths of these penguins.

code chuk

a <- 1

a <- 2

print(a)

[1] 1

Inline code

오늘 날짜는 “2023-09-06” 입니다.

Table

• 그냥 출력

ex <- read.csv('https://github.com/zarathucorp/R4CR-content/raw/main/example_g1e.csv')
head(ex)

  EXMD_BZ_YYYY RN_INDI HME_YYYYMM Q_PHX_DX_STK Q_PHX_DX_HTDZ Q_PHX_DX_HTN
1         2009  562083     200909            0             0            1
2         2009  334536     200911            0             0            0
3         2009  911867     200903            0             0            0
4         2009  183321     200908           NA            NA           NA
5         2009  942671     200909           NA            NA           NA
6         2009  979358     200912           NA            NA           NA
  Q_PHX_DX_DM Q_PHX_DX_DLD Q_PHX_DX_PTB Q_HBV_AG Q_SMK_YN Q_DRK_FRQ_V09N HGHT
1           0            0           NA        3        1              0  144
2           0            0           NA        2        1              0  162
3           0            0           NA        3        1              0  163
4          NA           NA           NA        3        1              0  152
5          NA           NA           NA        3        1              0  159
6          NA           NA           NA        2        1              0  157
  WGHT WSTC BMI VA_LT VA_RT BP_SYS BP_DIA URN_PROT HGB FBS TOT_CHOL  TG HDL LDL
1   61   90  29     1     1    120     80        1  13 117      264 128  60 179
2   51   63  19     1     1    120     80        1  14  96      169  92  70  80
3   65   82  25     1     1    130     80        1  15 118      216 132  55 134
4   51   70  22     1     1    101     62        1  13  90      199 100  65 114
5   50   73  20     1     1    132     78        1  13  92      162  58  40 111
6   55   73  22     2     2    110     70        1  12 100      192 109  53 117
  CRTN SGOT SGPT GGT GFR
1    1   25   20  25  59
2    1   18   15  28  74
3    1   26   30  30  79
4    1   18   14  11  61
5    1   24   23  15  49
6    1   15   12  14  83

library(knitr)
library(reactable)
library(DT)

• kable (STATIC, PDF)

knitr::kable(head(ex))

EXMD_BZ_YYYY	RN_INDI	HME_YYYYMM	Q_PHX_DX_STK	Q_PHX_DX_HTDZ	Q_PHX_DX_HTN	Q_PHX_DX_DM	Q_PHX_DX_DLD	Q_PHX_DX_PTB	Q_HBV_AG	Q_SMK_YN	Q_DRK_FRQ_V09N	HGHT	WGHT	WSTC	BMI	VA_LT	VA_RT	BP_SYS	BP_DIA	URN_PROT	HGB	FBS	TOT_CHOL	TG	HDL	LDL	CRTN	SGOT	SGPT	GGT	GFR
2009	562083	200909	0	0	1	0	0	NA	3	1	0	144	61	90	29	1	1	120	80	1	13	117	264	128	60	179	1	25	20	25	59
2009	334536	200911	0	0	0	0	0	NA	2	1	0	162	51	63	19	1	1	120	80	1	14	96	169	92	70	80	1	18	15	28	74
2009	911867	200903	0	0	0	0	0	NA	3	1	0	163	65	82	25	1	1	130	80	1	15	118	216	132	55	134	1	26	30	30	79
2009	183321	200908	NA	NA	NA	NA	NA	NA	3	1	0	152	51	70	22	1	1	101	62	1	13	90	199	100	65	114	1	18	14	11	61
2009	942671	200909	NA	NA	NA	NA	NA	NA	3	1	0	159	50	73	20	1	1	132	78	1	13	92	162	58	40	111	1	24	23	15	49
2009	979358	200912	NA	NA	NA	NA	NA	NA	2	1	0	157	55	73	22	2	2	110	70	1	12	100	192	109	53	117	1	15	12	14	83

• reactable

reactable::reactable(ex)

• DT

DT::datatable(ex)

iris 데이터의 행은 150개이다.

print(1+3)