Vedo i dati che sono in  http://macosa.dima.unige.it/schede/stpb2/pesi_leva.txt
Vedo che inziano con:
# pesi (troncati ai kg) visite arruolamento in Marina nel 1997 - primi scaglioni
62
64
64
68
...
Quindi copio il file e copio dalla memoria (clipboard) il file saltando (skip) la prima riga:

dati <- scan(file="clipboard",skip=1)
##  Read 4170 items
# Aggiungo 1/2 poiché i dati sono troncati (in modo che siano centrati sui singoli kg)
dati <- dati+1/2
# Carico un file che mi facilita le rappresentazioni grafiche
source("http://macosa.dima.unige.it/r.R")
# traccio l'istogramma della densità di frequenza (scrivo le coordinate un può più piccole)
hist(dati, probability=TRUE,col="yellow",cex.axis=0.88)
# traccio una griglia
BOX()