User Tools

Site Tools


estimated_standard_deviation:rout02

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision
Previous revision
estimated_standard_deviation:rout02 [2026/03/17 22:44] hkimscilestimated_standard_deviation:rout02 [2026/03/17 22:51] (current) hkimscil
Line 1: Line 1:
 +<WRAP group>
 +<WRAP column 55%>
 +<code>
 +> rm(list=ls())
 +
 +> rnorm2 <- function(n,mean,sd){ 
 ++     mean+sd*scale(rnorm(n)) 
 ++ }
 +
 +> # set.seed(191)
 +> nx <- 1000
 +> mx <- 50
 +> sdx <- mx * 0.1
 +> sdx  # 5
 +[1] 5
 +> x <- rnorm2(nx, mx, sdx)
 +> # x <- rnorm2(1000, 50, 5) 와 동일
 +
 +> mean(x)
 +[1] 50
 +> sd(x)
 +[1] 5
 +> length(x)
 +[1] 1000
 +> hist(x)
 +
 +</code>
 +</WRAP>
 +<WRAP column 35%>
 +</WRAP>
 <WRAP group> <WRAP group>
 <WRAP column 55%> <WRAP column 55%>
estimated_standard_deviation/rout02.1773787442.txt.gz · Last modified: by hkimscil

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki