# Relació sinusoidal.# Adaptat de Earl F. Glynn. loess Smoothing and Data Imputation # http://research.stowers-institute.org/efg/R/Statistics/loess.htmPERIODE=120X=1:120X=1:170Y=sin(2*pi*X/PERIODE)+runif(length(X),-1,1)DADES_SIN=data.frame(Y,X)save(DADES_SIN,file="dades/dades_rls_sin.RData")# Se desa la taula de dades anàlisi posteriorsload("dades/dades_rls_sin.RData")svg("gra/reg_ls_sin.svg")# Desar el gràficplot(Y~X,data=DADES_SIN,main="Relació sinusoïdal")mtext("La recta de regressió és de la Y sobre la X")# Subtítolabline(lm(Y~X,data=DADES_SIN))# Recta de regressiódev.off()
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