данные x y неизвестной функции

Датасет данных юных спортсменов.

setwd('C:/datas/')

data = read.csv(file = "datab.csv",header = T)

head(data) # отображение первых tail(data, n)

tail(data) # и последних n строк набора

setwd('C:/datas/')

data = read.csv(file = "urozaj.csv",header = T)
data = data[2:3]
head(data)
plot(data$name)