Differences

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

--- types_of_error:code01 [2025/11/25 04:54] – hkimscil
+++ types_of_error:code01 [2025/11/25 04:55] (current) – hkimscil
@@ Line 1: / Line 1: @@
 <code>
+rm(list=ls())
+rnorm2 <- function(n,mean,sd){
+  mean+sd*scale(rnorm(n))
+}
+se <- function(sample) {
+  sd(sample)/sqrt(length(sample))
+}
+ss <- function(x) {
+  sum((x-mean(x))^2)
+}
+################################
 N.p <- 1000000
 m.p <- 50