simpan = c (10, 20, 40, 15, 40)
simpan
## [1] 10 20 40 15 40
kuadrat=function(x)
{
print(x*x);
}
A=c(4)
kuadrat(A)
## [1] 16
mode(kuadrat)
## [1] "function"
A=c(10,25,90,75,95,57)
max(A)
## [1] 95
min(A)
## [1] 10
A=c(10, 10, 10, 10, 20, 20, 30, 30, 30, 30, 30, 30)
barplot(table(A))