poblenou data

NOx levels measured every hour by a control station in Poblenou in Barcelona (Spain).

Format

The format is:
..$nox: fdata class object with:
i.- "data": Matrix with 115 curves (rows) discretized in 24 points or argvals (columns).
ii.- "argvals": 0:23
iii.- "rangeval"=(0,23): range("argvals"),
iv.- "names" list with: main an overall title "NOx data set", xlab title for x axis "Hours" and ylab title for y axis "NOx (mglm^3)".

..$df: Data Frame with (115x3) dimension.
"date" in the first column.
Second column ("day.week"). Factor levels: "Monday" 1, "Tuesday" 2, "Wednesday" 3, "Thursday" 4, "Friday" 5, "Saturday" 6 and "Sunday" 7.
Third column "day.festive". Factor levels: "non festive day" 0 and "festive day" 1.

Source

https://mediambient.gencat.cat/ca/05_ambits_dactuacio/

Details

The dataset starts on 23 February and ends on 26 June, in 2005. We split the whole sample of hourly measures in a dataset of functional trajectories of 24 h observations (each curve represents the evolution of the levels in 1 day).
Twelve curves that contained missing data were eliminated.

References

Febrero-Bande, M., Galeano, P., and Gonzalez-Manteiga, W. (2008). Outlier detection in functional data by depth measures with application to identify abnormal NOx levels. Environmetrics 19, 4, 331-345.

Author

Febrero-Bande, M and Oviedo de la Fuente, Manuel

Examples

data(poblenou)
names(poblenou)
#> [1] "nox" "df" 
names(poblenou$nox) 
#> [1] "data"     "argvals"  "rangeval" "names"   
nox<-poblenou$nox
class(nox)
#> [1] "fdata"
ind.weekend<-as.integer(poblenou$df[,"day.week"])>5
plot(nox,col=ind.weekend+1)