기본 콘텐츠로 건너뛰기

R에서 난수 형성하기와 시드값



 난수는 여러 가지 목적을 위해서 생성하게 됩니다. 주로는 시뮬레이션이나 혹은 예제를 설명하기 위한 테스트 파일 등을 형성하는 것이 목적입니다. 여기서 말하는 난수는 일양난수 (uniform random numbers)로 동전의 앞뒷면 던지기나 혹은 주사위의 눈처럼 결과에 규칙성이 없고 (무규칙성), 횟수를 늘리면 확률이 일정한 (등확률성) 난수입니다.  


 예를 들어 주사위가 조작된 것이 아니라면 던질때마다 1이 나올 확률은 1/6일 것입니다. 다만 1에서 6가운데 어떤 수가 나올지는 규칙성이 없고 횟수를 크게 늘리면 1에서 6까지 정확히 1/6씩의 확률을 지닐 것입니다. R에서는 사실 내부적으로 메르센 트위스터법 (Mersenne Twister)라는 방식으로 유사 난수를 만듭니다. 32비트 버전에서 이는 1/20억분의 1의 확률로 같은 수를 만들기 때문에 우연히 같은 수가 배열될 가능성은 거의 없다고 봐도 무방합니다. 


 R에서 난수 만들기의 기본 함수는 runif 입니다. runif () 에서 () 안에 원하는 수의 난수를 형성하도록 할 수 있습니다. 만드는 난수는 기본적으로 0과 1 사이의 임의의 수입니다. 기본적으로 R은 7자리 수를 표시한다는 것은 앞서 설명한대로입니다. 


> runif(10)
 [1] 0.7973274 0.6628566 0.2525148 0.4517695 0.2884910 0.6700911 0.4800454 0.5902301 0.6887335 0.3144737


 위에서 10개의 수를 지정했는데 이와 같은 결과가 나왔습니다. 그런데 다시 같은 함수를 돌리면 이번엔 다른 난수가 나옵니다. 


> runif(10)
 [1] 0.6629405 0.6337934 0.9406617 0.5592423 0.2213430 0.8140099 0.4750340 0.1804209 0.9003436 0.4341867

 한 눈에 보기에도 중복되는 난수가 없는데, 우연히 중복된 난수가 나올 가능성은 20억 분의 1 이하입니다.


 이렇게 생성된 난수는 여러 가지 목적으로 사용할 수 있습니다. 그런데 특별한 목적을 위해서 같은 순서의 난수를 만들 수는 없을까요? 여기서 시드값 (seed) 이라는 개념이 나옵니다. 시드값은 컴퓨터 내부에서 돌아가는 특정한 난수 생성 공식에서 처음 시작값을 주어 매번 같은 값이 나오게 만드는 것입니다. R에서는 set.seed 함수를 이용합니다. set.seed(원하는 시드값)을 주고 작동을 시키면 됩니다. 


> set.seed(1234)
> runif(5)
[1] 0.1137034 0.6222994 0.6092747 0.6233794 0.8609154
> set.seed(1234)
> runif(5)

[1] 0.1137034 0.6222994 0.6092747 0.6233794 0.8609154

 중요한 것은 set.seed와 난수를 생성하는 명령어를 같이 실행시켜야 한다는 것입니다. 따로 실행시키면 매번 다른 난수가 생성됩니다. 


 난수는 0-1까지를 생성할 수도 있지만, 정규분포를 따르는 형태의 난수를 만들 수 있습니다. rnorm 이 그것으로 장규분포를 따르는 원하는 난수의 숫자, 평균, 표준편차를 쓰면 됩니다. rnorm(10,0,1) 이면 10개의 정규분포를 따르는 난수를 생성하되 평균은 0이고 표준편차는 1이 되는 것입니다. 물론 set.seed 값을 주면 매번 같은 난수를 생성할 수 있습니다. 

> set.seed(123)
> rnorm(10,0,1)
 [1] -0.56047565 -0.23017749  1.55870831  0.07050839  0.12928774  1.71506499  0.46091621 -1.26506123 -0.68685285 -0.44566197
> set.seed(123)
> rnorm(10,0,1)

 [1] -0.56047565 -0.23017749  1.55870831  0.07050839  0.12928774  1.71506499  0.46091621 -1.26506123 -0.68685285 -0.44566197



 다음에는 이  난수 값을 응용해서 if else 구문과 간단한 시뮬레이션을 작성하는 방법을 알아보겠습니다. 



댓글

  1. 안녕하세요, 설명 감사합니다.
    질문이 한 가지 있습니다.
    혹시 컴퓨터의 환경에 변화를 주었을 때 (Ex: 하드디스크를 교체한 후에 새롭게 R studio를 설치) 동일한 set.seed 설정을 이용하여 난수를 생성하는 경우, 그 값이 달라질 수도 있나요?

    "여기서 시드값 (seed) 이라는 개념이 나옵니다. 시드값은 컴퓨터 내부에서 돌아가는 특정한 난수 생성 공식에서 처음 시작값을 주어 매번 같은 값이 나오게 만드는 것입니다. R에서는 set.seed 함수를 이용합니다. set.seed(원하는 시드값)을 주고 작동을 시키면 됩니다."

    set.seed(123)을 고정시킨 경우 이 컴퓨터에서 생성한 난수값과 다른 컴퓨터에서 생성한 난수 값이 항상 같게 나오는 지 궁금합니다.

    감사합니다.

    답글삭제

댓글 쓰기

이 블로그의 인기 게시물

벨 V-280 Valor 시험 비행 성공

( The V-280 Valor flew for the first time at Bell Helicopter's Amarillo Assembly Center in Texas(Credit: Bell Helicopter/YouTube) )  앞서 소개드린 V-280 발러가 첫 번째 비행 테스트에 성공했다는 소식입니다. V-22 오스프리의 소형화 버전이라고 할 수 있는 V-280 발러는  미 육군의 차세대 헬기 사업인 Future Vertical Lift (FVL)에 입찰을 시도하는 틸트로터기로 현재 미 육군이 주력으로 사용하는 블랙호크 헬기와 비슷한 체급입니다. 다만 틸트로터기인 만큼 최고 속도나 항속 거리면에서 더 유리합니다. 스펙은 이전 포스트를 참조해 주시기   이전 포스트:  https://blog.naver.com/jjy0501/221115245986  (동영상)   V-280 발러는 틸트로터기의 더 대중화 될 수 있을지를 검증하는 중요한 무대가 될 것입니다. V-22 오스프리의 경우 복잡한 구조로 인해 가격이 너무 비싸져서 사실 미국은 몰라도 그 동맹국에 널리 도입되기는 어려운 부분이 있습니다. V-280 역시 가격이 아주 저렴할 것 같지는 않지만, 좀 더 합리적인 대안은 될 수 있을 것 같습니다. 만약 성공적인 결과가 나오면 한국을 포함한 미국의 동맹국에서 도입을 검토할 수 있을지 모르겠다는 생각입니다.   참고  https://newatlas.com/bell-v-280-valor-maiden-flight/52663/

100 테슬라급 자기장 도달

 미국의 로스 알라모스 국립 연구소 (Los Alamos National Laboratory) 에서 과학자들이 지금까지 인간이 개발한 가장 강력한 자기장을 발생시키는 장치 개발에 도전하고 있습니다. 자기장의 세기를 나타내는 방법으로 자기력선의 밀도를 나타내기 위해 단위 면적당 자기력선의 수를 표시하는 단위인 테슬라 (T) 가 있습니다. (1T = 1Wb/㎡  웨버 (Wb) 는 자속의 단위)   의료용으로 사용되는 초전도체를 이용한 MRI 의 경우 1.5 - 3 테슬라급의 강력한 자기장으로 인체 내부를 볼 수 있게 만들지만 과학 연구용으로 이보다 더 강력한 자기장이 필요할 수 있습니다. 최근에 등장한 90 테슬라급 자기장에 이어 이번에 로스 알라모스 국립 연구소에서는 100 테슬라급인 100.75 T 를 실현 했다고 합니다.   이를 구현한 것은 18000 파운드 (8.16 톤 정도) 의 코일과 여기에 에너지를 공급할 1200 메가줄 (Megajoule) 급 모터 제네레이터등의 설비입니다.  (   The 1,200-megajoule motor generator that powers the magnetic pulse.  )  이와 같은 연구를 통해 알아내고자 하는 것은  Quantum Phase transitions and new ultra high field magnetic states Electronic Structure determination Topologically protected states of matter  로 요약할 수 있다고 합니다.   아무튼 수 T 급 MRI 만 해도 자기장의 힘이 엄청난데 100 T 라니 엄청난 자기장이네요. 이는 지구 자기장 세기보다 200만배 강력한 (물론 좁은 범위에서 작용하는 자기장이라 지구 전체...

고대 양서류 이야기 (2) - 악어를 닮은 거대 양서류들

  페름기에는 다양한 양막류가 진화해서 앞서 소개한 육상형 템노스폰딜리는 점차 설 자리를 잃게 됩니다. 하지만 양서류는 본래 자신의 서식지인 물과 습지에서 여전히 번성을 누렸습니다. 당시에는 악어류 같은 대형 양서형 파충류도 없던 시절이었기 때문에 이와 비슷한 생태학적 지위는 여전히 양서류의 몫이었습니다. 이들에 대한 이야기는 제 책인 포식자에서 비교적 간단히 다뤘는데, 오늘은 여기에 대한 보충 설명입니다.  책 정보:  http://book.naver.com/bookdb/book_detail.nhn?bid=13347200 Yes 24:  http://www.yes24.com/24/goods/58772859 11번가:  http://books.11st.co.kr/product/SellerProductDetail.tmall?method=getSellerProductDetail&prdNo=1977867160 알라딘:  http://www.aladin.co.kr/shop/wproduct.aspx?ItemId=134877825 교보문고:  http://www.kyobobook.co.kr/product/detailViewKor.laf?ejkGb=KOR&mallGb=KOR&barcode=9788970447988&orderClick=LAG&Kc= 인터파크 :  http://book.interpark.com/product/BookDisplay.do?_method=detail&sc.prdNo=279593764&sc.saNo=003002003&bid1=search_auto&bid2=detail&bid3=prd_img&bid4=001 영풍문고:  http://www.ypbooks.co.kr/book.yp?bookcd=100843205&gubun=NV ...