# Es crea la base de dades amb nombres aleatoris:set.seed(1)N=100U=rnorm(N)EDAT=50+rnorm(N)PAD=20+EDAT+U# Pressió arterial diastòlicaDADES_RLS=data.frame(PAD,EDAT)# Es crea la taula de dades# Regressío linal simple:PAD_LM=lm(PAD~EDAT,data=DADES_RLS)# S'estima el model de regressió linealsvg("gra/reg_ls_dgr_resid_t_ajust.svg")# Desar el diagrama en un fitxer tipus svgplot(PAD_LM,which=3)# Diagrama de dispersió dels residus tipificatsdev.off()# Tancar i desar el diagrama
Llicència
Jo, el titular dels drets d'autor d'aquest treball, el public sota la següent llicència:
compartir – copiar, distribuir i comunicar públicament l'obra
adaptar – fer-ne obres derivades
Amb les condicions següents:
reconeixement – Heu de donar la informació adequada sobre l'autor, proporcionar un enllaç a la llicència i indicar si s'han realitzat canvis. Podeu fer-ho amb qualsevol mitjà raonable, però de cap manera no suggereixi que l'autor us dóna suport o aprova l'ús que en feu.
compartir igual – Si modifiqueu, transformeu, o generareu amb el material, haureu de distribuir les vostres contribucions sota una llicència similar o una de compatible com l'original
Aquest fitxer conté informació addicional, probablement afegida per la càmera digital o l'escàner utilitzat per a crear-lo o digitalitzar-lo. Si s'ha modificat posteriorment, alguns detalls poden no reflectir les dades reals del fitxer modificat.