>>> x=rt(100, df=3)          # t 분포에서 자유도 3으로 난수 100개 생성
>>> hist(x, probability=TRUE)
>>> curve(dt(x, 3), add=T)   # t 분포 PDF 표현, 곡선 추가