๐Ÿฉบ R for Clinical Research

์˜ํ•™์—ฐ๊ตฌ๋ฅผ ์œ„ํ•œ R ์›Œํฌ์ƒต




์›Œํฌ์ƒต์˜ ๊ฐœ์š”

  • R์€ ๋‹จ์ˆœํ•œ ํ†ต๊ณ„ํ”„๋กœ๊ทธ๋žจ์ด ์•„๋‹Œ ๋ฐ์ดํ„ฐ๋ถ„์„ ์ „ ๊ณผ์ •์„ ํฌํ•จํ•˜๋Š” ํ”Œ๋žซํผ์œผ๋กœ ์˜ํ•™์—ฐ๊ตฌ์— ํ•„์ˆ˜์ž…๋‹ˆ๋‹ค.
  • ๋ณธ ์›Œํฌ์ƒต์„ ํ†ตํ•ด ์˜ํ•™์—ฐ๊ตฌ์— ํ•„์š”ํ•œ ๋ฐ์ดํ„ฐ ๋งค๋‹ˆ์ง€๋จผํŠธ, ํ†ต๊ณ„, ๊ทธ๋ฆฌ๊ณ  ๋ถ„์„๊ฒฐ๊ณผ ์ •๋ฆฌ(๋ฌธ์„œ/์Šฌ๋ผ์ด๋“œ/์›น) ๋ฅผ ๋ฐฐ์šฐ์‹ค ์ˆ˜ ์žˆ์œผ๋ฉฐ, ๋ชจ๋“  ์˜ˆ์‹œ๋Š” ๋ณดํ—˜๊ณต๋‹จ ๋น…๋ฐ์ดํ„ฐ๋ฅผ ์ด์šฉํ•˜๋ฏ€๋กœ ์›Œํฌ์ƒต ์ดํ›„ ๋ฐ”๋กœ ๊ณต๋‹จ/์‹ฌํ‰์› ๋น…๋ฐ์ดํ„ฐ๋ฅผ ๋ถ„์„ํ•˜์‹ค ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.
  • ์‹ค์Šต์ฝ”๋“œ๋ฅผ ๊ฐœ์ธ github ์ €์žฅ์†Œ์—์„œ ๊ด€๋ฆฌํ•˜๋ฉด์„œ ์˜คํ”ˆ์†Œ์Šค ์ƒํƒœ๊ณ„์— ์ต์ˆ™ํ•ด์ง€๊ณ , ์žฅ์ฐจ ๋ณธ์ธ์˜ R ํŒจํ‚ค์ง€๋ฅผ ๋งŒ๋“ค์–ด ์˜ํ•™์—ฐ๊ตฌ์— ๊ธฐ์—ฌํ•  ์ˆ˜ ์žˆ๊ธธ ๊ธฐ๋Œ€ํ•ฉ๋‹ˆ๋‹ค.

์›Œํฌ์ƒต ๋Œ€์ƒ

  • R๋กœ ์˜ํ•™์—ฐ๊ตฌ๋ฅผ ์ˆ˜ํ–‰ํ•˜๋ ค๋Š” ๋ถ„
  • ๊ณต๋‹จ/์‹ฌํ‰์› ๋น…๋ฐ์ดํ„ฐ๋ฅผ ๋ถ„์„ํ•˜๋ ค๋Š” ๋ถ„์„๊ฐ€, ์ œ์•ฝ์—…๊ณ„ ์ž„์ง์›
  • R๋กœ ์›น์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์„ ๋งŒ๋“ค๊ณ  ์‹ถ์€ ๋ถ„

๋ณธ์ธ์˜ ์—ฐ๊ตฌ๋ฅผ ์œ„ํ•œ ๋ฐ์ดํ„ฐ๋ฅผ ์ค€๋น„ํ•ด์˜ค์‹œ๋ฉด ์ข‹์Šต๋‹ˆ๋‹ค

์›Œํฌ์ƒต์˜ ์ปค๋ฆฌํ˜๋Ÿผ

1์ผ์ฐจ: R ๋ฐ์ดํ„ฐ ๋งค๋‹ˆ์ง€๋จผํŠธ

  • R ๋ฐ์ดํ„ฐ ๋งค๋‹ˆ์ง€๋จผํŠธ ๊ธฐ์ดˆ
  • R ๋ฐ์ดํ„ฐ ๋งค๋‹ˆ์ง€๋จผํŠธ: tidyverse
  • R ๋ฐ์ดํ„ฐ ๋งค๋‹ˆ์ง€๋จผํŠธ: data.table
  • ์‹ค์Šต: ๊ณต๋‹จ ์˜ˆ์ œ๋ฐ์ดํ„ฐ ์ด์šฉ ์ฝ”ํ˜ธํŠธ ๋งŒ๋“ค๊ธฐ
  • R plot ๊ธฐ์ดˆ

2์ผ์ฐจ: R ํ†ต๊ณ„๋ถ„์„

  • ๊ฐœ๋…์ •๋ฆฌ: ๊ฐ€๋Šฅ๋„(likelihood), ์ •๊ทœ๋ถ„ํฌ
  • ๊ธฐ์ˆ ํ†ต๊ณ„: Table1 ์— ์“ฐ์ด๋Š” ํ†ต๊ณ„
  • ํšŒ๊ท€/๋กœ์ง€์Šคํ‹ฑ/์ƒ์กด๋ถ„์„
  • ์ƒ์กด๋ถ„์„ ์‹ฌํ™”: Landmark analysis, Time dependent covariate
  • ๋น„์„ ํ˜•๋ถ„์„: Generalized Additive Model (GAM)

3์ผ์ฐจ: R๋กœ ์ปจํ…์ธ  ๋งŒ๋“ค๊ธฐ

  • Github์„ ํ™œ์šฉํ•œ ๋ฒ„์ „ ์ปจํŠธ๋กค
  • rmarkdown/quarto: ์ฝ”๋“œ์™€ ๋ถ„์„ ๊ฒฐ๊ณผ๋ฅผ ํฌํ•จํ•œ ๋ฌธ์„œ ๋งŒ๋“ค๊ธฐ
  • Shiny: ์›น ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜
  • R ํŒจํ‚ค์ง€ ๊ธฐ์ดˆ

์‹ค์Šต์„ ์œ„ํ•ด ๊ฐœ์ธ ๋…ธํŠธ๋ถ์„ ๋ฐ˜๋“œ์‹œ ์ง€์ฐธํ•˜์…”์•ผ ํ•ฉ๋‹ˆ๋‹ค.

ํ•„๊ธฐ๊ตฌ์™€ ์ฑ…์ž๋Š” ์ค€๋น„๋˜์–ด ์žˆ์Šต๋‹ˆ๋‹ค.

๐Ÿ—“ ๋‚ ์งœ ๋ฐ ์žฅ์†Œ

  • TBD (3ํšŒ์ฐจ ์ผ์ •์€ 2024๋…„ ์ดˆ ์ดํ›„)

๊ต์œก๋น„

  • 1์ผ 40๋งŒ์›, 3์ผ 100๋งŒ์›

ํ•™์ƒ์˜ ๊ฒฝ์šฐ, ์ฐจ๋ผํˆฌ๊ฐ€ 50%์˜ ๋น„์šฉ์„ ์ง€์›ํ•ฉ๋‹ˆ๋‹ค. (๊ฒฐ์ œ์‹œ ๋ฌธ์˜)
์‹๋น„ / ์ฃผ์ฐจ๋น„๊ฐ€ ํฌํ•จ๋˜์–ด ์žˆ์Šต๋‹ˆ๋‹ค.

์—ฐ๊ตฌ๋น„์นด๋“œ ๊ฒฐ์ œ ๊ฐ€๋Šฅํ•ฉ๋‹ˆ๋‹ค.
์นด๋“œ / ํ˜„๊ธˆ ํ˜ผํ•ฉ ๊ฒฐ์ œ ๊ฐ€๋Šฅํ•ฉ๋‹ˆ๋‹ค.
์„ธ๊ธˆ๊ณ„์‚ฐ์„œ / ํ˜„๊ธˆ์˜์ˆ˜์ฆ ๋ฐœํ–‰ ๊ฐ€๋Šฅํ•ฉ๋‹ˆ๋‹ค.

์‹ ์ฒญ ๋ฐ ๋ฌธ์˜

์›Œํฌ์ƒต ์ฐธ์„์ž ์†Œ์† ๊ธฐ๊ด€