Kod 4.10 - NMSwBE

# Kod 4.10 Odczyt danych

link='http://stat.ue.katowice.pl/hdi_ind.csv'

dane=read.csv(link,header=TRUE,sep=';',dec=',')

n=10

x1=1- rank(dane[1:n,3])/(n+1)

x2=1- rank(dane[1:n,4])/(n+1)

x3=1- rank(dane[1:n,5])/(n+1)

x=cbind(x1,x2,x3)