Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Blog
2
#R version 3.3.2 file_ <- file("stdin") #Считываем данные из файла: dat<-read.table(file_, sep=",") d<-as.numeric(dat) d #Посчитать среднее значение можно так: mean(d) #Посчитать дисперсию можно так: var(d) #Среднее квадратическое отклонение посчитать можно так: sd(d) #Или так: sqrt(d) #Первое значение – это мода, а второе – на какой позиции в вариационном ряду находится мода: which.max(table(d)) #Медиана: median(d) #Коэффициент асимметрии можно посчитать по формуле (см. ниже), следующим образом: a<-table(d) a d zn<-sort(unique(d)) zn sr_znach<-mean(d) sr_znach n<-length(d) n disp<-var(d) disp koeff_asimm<-sum((zn-sr_znach)^3*a)/(n*disp^3)
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Mietflächen clustern für flächenbasierte Prognosen
stats and fats survey histograms
Recamán sequence
Mandelbrot 2
Kruskal Wallis test
Practices - 1
First program
Julia set variant 3
Ass2 q2
R multiplication
Please log in to post a comment.