몇가지 손수 만든 R function 들인데 조잡하지만 나름 편리하게 이용하고 있습니다. extr.num 은 데이터 cleaning 할 때 outlier 들을 보는 데 유용하고, qw 는 perl 에서 쓰는 함수 명을 그대로 따왔는데 정확히 똑같진 않지만 여러 text 들을 하나의 vector 로 묶을 때 편합니다. 안 그러면 따옴표랑 쉼표 찍느라고 무지 번거롭죠. 그 중 logistic() 같은 것은 써보면 제법 편리할 겁니다. R 에서 logistic regression 을 하려면 보시는 바와 같이 glm (…) 으로 한참 길게 써야 하는 번거로움에다가, 우선 보고 싶은 게 odds ratio 인데 그걸 안보여준다는…! 어쩌자고 이리 만들어 놨는지는 모르겠지만… logistic 은 제가 데이터 분석할 때 logistic regression 할 때마다…
Pooled cohort equation 으로 10년 간의 심뇌혈관질환의 발병 위험도를 예측하는 공식을 R function 으로 구현하였습니다.
KASI의 개발 과정에 대한 논문(Korean Circulation Journal 2000;30(8):1004-1009)이 2001년도 대한순환기 추계 학회에서 2001년도 우수논문으로 선정된 바 있습니다. 이후 연구자가 이를 이용하여 연구를 수행한 연구로서 심부전환자에서 NT-proBNP 와 KASI 간의 관계를 본 논문(Korean Circulation Journal 2004;34(9):894-899)이 있습니다. Introduction 환자의 functional status를 측정하는 것은 임상에서 환자를 진료하는 데 있어서나 또는 임상연구에 있어서 기본적인 변수로서 중요하고 또한 빈번하게 행해지는 일이다. 그러나 모든 측정에 있어서는 항상 도구(tool 또는 instrument)가 필요하고 또 그 도구의 정확성과 신뢰성이 어느 정도 이상은 보장되어야 한다는 것이 필수적인 전제 조건이며 functional status에 있어서도 이러한 점은 예외가 아니라는 것에 대해 별로 논의가 없었다. 외국에서 이미 사용되고 있는 functional status 측정도구로는 널리…