#Criando a planilha

setwd("INSIRA AQUI O CAMINHO DA PASTA DE TRABALHO")

diabetes <- read.csv("diabetes.csv", sep = ";")


#Sorteando a amostra

amostra <- diabetes[sort(sample.int(n = 50000, size = 10)), ]


#Exibir a amostra

amostra


#Sumário estatístico

summary(amostra)

Last modified: Monday, 22 August 2016, 7:49 AM