# rysunek 1.8


hist(log10(perf),main="log10(perf)",ylab="Liczebność")
hist(perf,main="perf", ylab="Liczebność")