Bab-4.R

### Tugas Statistika Bab 4 ###

simpan=read.table(file.choose(), header= T, sep = ";")
simpan

##   Nilai.Nilai.Nilai.Nilai.Nilai
## 1               1\t5\t9\t12\t16
## 2              2\t6\t10\t13\t17
## 3              3\t7\t11\t14\t18
## 4                4\t8\t11\t15\t

data_1=simpan$data1 #data_1 menyimpan data1
data_11 = na.omit(data_1) #data_11 menyimpan data1, tanpa NA
data_2=simpan$data2 #data_2 menyimpan data2
data_21=na.omit(data_2) #data_21 menyimpan data2, tanpa NA
data_3=simpan$data3 #data_3 menyimpan data3
data_31=na.omit(data_3) #data_31 menyimpan data3, tanpa NA

data_1 #menampilkan data1 atau data pada Tabel 4.1

## NULL

data_11 #menampilkan data1 atau data pada Tabel 4.1, dengan menghapus NA

## NULL

data_2 #menampilkan data2 atau data pada Tabel 4.3

## NULL

data_21 #menampilkan data2 atau data pada Tabel 4.3, dengan menghapus NA

## NULL

data_3 #menampilkan data3 atau data pada Tabel 4.9

## NULL

data_31 #menampilkan data3 atau data pada Tabel 4.9, dengan menghapus NA

## NULL

library(psych) #mengaktifkan package "psych" yang di dalamnya menyediakan fungsi describe()
summary(data_11)

## Length  Class   Mode 
##      0   NULL   NULL

summary(data_21)

## Length  Class   Mode 
##      0   NULL   NULL

summary(data_31)

## Length  Class   Mode 
##      0   NULL   NULL

library(pastecs)
summary(data_11)

## Length  Class   Mode 
##      0   NULL   NULL

summary(data_21)

## Length  Class   Mode 
##      0   NULL   NULL

summary(data_31)

## Length  Class   Mode 
##      0   NULL   NULL

simpan=read.table(file.choose(), header = T, sep = ";")
simpan

##   Nilai.Nilai.Nilai.Nilai.Nilai
## 1               1\t5\t9\t12\t16
## 2              2\t6\t10\t13\t17
## 3              3\t7\t11\t14\t18
## 4                4\t8\t11\t15\t

library(doBy)
summary(data_11)

## Length  Class   Mode 
##      0   NULL   NULL