roslinazairimah zakaria
2024-Oct-04 04:02 UTC
[R] Warning message: Removed 888 rows containing missing values or values outside the scale range (`geom_line()`)
Dear all, I tried to rerun the examples given by Hyndman in otexts but keep on getting errors and I have searched through google but no solution yet. Thank you in advance for any help given. library(fpp3) library(lubridate) library(xts) library(fabletools) library(ggplot2) library(dplyr) library(gridExtra)> dput(head(new_us_retail_employment,100))structure(list(Month = structure(c(-11323, -11292, -11264, -11233,-11203, -11172, -11142, -11111, -11080, -11050, -11019, -10989, -10958, -10927, -10898, -10867, -10837, -10806, -10776, -10745, -10714, -10684, -10653, -10623, -10592, -10561, -10533, -10502, -10472, -10441, -10411, -10380, -10349, -10319, -10288, -10258, -10227, -10196, -10168, -10137, -10107, -10076, -10046, -10015, -9984, -9954, -9923, -9893, -9862, -9831, -9803, -9772, -9742, -9711, -9681, -9650, -9619, -9589, -9558, -9528, -9497, -9466, -9437, -9406, -9376, -9345, -9315, -9284, -9253, -9223, -9192, -9162, -9131, -9100, -9072, -9041, -9011, -8980, -8950, -8919, -8888, -8858, -8827, -8797, -8766, -8735, -8707, -8676, -8646, -8615, -8585, -8554, -8523, -8493, -8462, -8432, -8401, -8370, -8342, -8311), class = c("yearmonth", "vctrs_vctr")), Series_ID c("CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001"), Title = c("Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private", "Total Private"), Employed = c(25338, 25447, 25833, 25801, 26113, 26485, 26481, 26848, 27468, 27830, 27740, 27886, 26847, 26902, 27205, 27255, 27535, 27765, 27789, 28332, 29007, 29399, 29619, 30221, 29402, 29671, 30079, 30610, 31379, 31999, 32545, 33014, 33417, 33457, 33367, 33552, 32660, 32739, 33240, 33764, 34203, 34624, 35065, 35460, 35771, 35852, 35867, 36209, 35494, 35627, 35955, 36212, 36202, 36608, 36637, 36628, 36584, 36658, 36810, 36815, 36018, 35973, 35948, 35833, 35768, 35949, 35861, 35828, 35652, 35555, 35597, 35850, 35229, 35290, 35411, 35161, 35024, 35065, 34769, 34490, 32760, 32833, 33354, 33755, 33656, 33092, 34240, 34997, 35409, 36074, 36474, 37139, 37532, 37637, 38045, 38351, 37510, 37495, 37720, 37686 )), class = c("tbl_ts", "tbl_df", "tbl", "data.frame"), row.names = c(NA, -100L), key = structure(list(Series_ID = "CEU0500000001", .rows structure(list( 1:100), ptype = integer(0), class = c("vctrs_list_of", "vctrs_vctr", "list"))), class = c("tbl_df", "tbl", "data.frame"), row.names = c(NA, -1L), .drop = TRUE), index = structure("Month", ordered = TRUE), index2 = "Month", interval = structure(list( year = 0, quarter = 0, month = 1, week = 0, day = 0, hour = 0, minute = 0, second = 0, millisecond = 0, microsecond = 0, nanosecond = 0, unit = 0), .regular = TRUE, class = c("interval", "vctrs_rcrd", "vctrs_vctr"))) # Decomposition new_us_retail_employment <- na.omit(us_retail_employment) # data cleaning new_us_retail_employment |> model( classical_decomposition(Employed, type = "additive") ) |> components() |> autoplot() +xlab("Year") + ggtitle("Classical additive decomposition of total US retail employment")> new_us_retail_employment |>+ model(+ classical_decomposition(Employed, type = "additive")+ ) |>+ components() |>+ autoplot() +xlab("Year") ++ ggtitle("Classical additive decomposition of total+ US retail employment")Warning message:Removed 888 rows containing missing values or values outside the scale range (`geom_line()`)-- *Roslinazairimah Zakaria* *Tel: +609-5492370; Fax. No.+609-5492766* *Email: roslinazairimah at ump.edu.my <roslinazairimah at ump.edu.my>; roslinaump at gmail.com <roslinaump at gmail.com>* Faculty of Industrial Sciences & Technology University Malaysia Pahang Lebuhraya Tun Razak, 26300 Gambang, Pahang, Malaysia [[alternative HTML version deleted]]
Hasan Diwan
2024-Oct-04 04:09 UTC
[R] Warning message: Removed 888 rows containing missing values or values outside the scale range (`geom_line()`)
These are warnings, not errors. On Thu, 3 Oct 2024 at 21:02, roslinazairimah zakaria <roslinaump at gmail.com> wrote:> Dear all, > I tried to rerun the examples given by Hyndman in otexts but keep on > getting errors and I have searched through google but no solution yet. > > Thank you in advance for any help given. > > library(fpp3) > library(lubridate) > library(xts) > library(fabletools) > library(ggplot2) > library(dplyr) > library(gridExtra) > > > dput(head(new_us_retail_employment,100))structure(list(Month > structure(c(-11323, -11292, -11264, -11233, > -11203, -11172, -11142, -11111, -11080, -11050, -11019, -10989, > -10958, -10927, -10898, -10867, -10837, -10806, -10776, -10745, > -10714, -10684, -10653, -10623, -10592, -10561, -10533, -10502, > -10472, -10441, -10411, -10380, -10349, -10319, -10288, -10258, > -10227, -10196, -10168, -10137, -10107, -10076, -10046, -10015, > -9984, -9954, -9923, -9893, -9862, -9831, -9803, -9772, -9742, > -9711, -9681, -9650, -9619, -9589, -9558, -9528, -9497, -9466, > -9437, -9406, -9376, -9345, -9315, -9284, -9253, -9223, -9192, > -9162, -9131, -9100, -9072, -9041, -9011, -8980, -8950, -8919, > -8888, -8858, -8827, -8797, -8766, -8735, -8707, -8676, -8646, > -8615, -8585, -8554, -8523, -8493, -8462, -8432, -8401, -8370, > -8342, -8311), class = c("yearmonth", "vctrs_vctr")), Series_ID > c("CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001", "CEU0500000001", > "CEU0500000001", "CEU0500000001", "CEU0500000001"), Title = c("Total > Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private", "Total Private", > "Total Private", "Total Private", "Total Private"), Employed = c(25338, > 25447, 25833, 25801, 26113, 26485, 26481, 26848, 27468, 27830, > 27740, 27886, 26847, 26902, 27205, 27255, 27535, 27765, 27789, > 28332, 29007, 29399, 29619, 30221, 29402, 29671, 30079, 30610, > 31379, 31999, 32545, 33014, 33417, 33457, 33367, 33552, 32660, > 32739, 33240, 33764, 34203, 34624, 35065, 35460, 35771, 35852, > 35867, 36209, 35494, 35627, 35955, 36212, 36202, 36608, 36637, > 36628, 36584, 36658, 36810, 36815, 36018, 35973, 35948, 35833, > 35768, 35949, 35861, 35828, 35652, 35555, 35597, 35850, 35229, > 35290, 35411, 35161, 35024, 35065, 34769, 34490, 32760, 32833, > 33354, 33755, 33656, 33092, 34240, 34997, 35409, 36074, 36474, > 37139, 37532, 37637, 38045, 38351, 37510, 37495, 37720, 37686 > )), class = c("tbl_ts", "tbl_df", "tbl", "data.frame"), row.names = c(NA, > -100L), key = structure(list(Series_ID = "CEU0500000001", .rows > structure(list( > 1:100), ptype = integer(0), class = c("vctrs_list_of", "vctrs_vctr", > "list"))), class = c("tbl_df", "tbl", "data.frame"), row.names = c(NA, > -1L), .drop = TRUE), index = structure("Month", ordered = TRUE), > index2 = "Month", interval = structure(list( > year = 0, quarter = 0, month = 1, week = 0, day = 0, hour = 0, > minute = 0, second = 0, millisecond = 0, microsecond = 0, > nanosecond = 0, unit = 0), .regular = TRUE, class = c("interval", > "vctrs_rcrd", "vctrs_vctr"))) > > > > # Decomposition > new_us_retail_employment <- na.omit(us_retail_employment) # data cleaning > > new_us_retail_employment |> > model( > classical_decomposition(Employed, type = "additive") > ) |> > components() |> > autoplot() +xlab("Year") + > ggtitle("Classical additive decomposition of total > US retail employment") > > > new_us_retail_employment |>+ model(+ > classical_decomposition(Employed, type = "additive")+ ) |>+ > components() |>+ autoplot() +xlab("Year") ++ ggtitle("Classical > additive decomposition of total+ US retail > employment")Warning message:Removed 888 rows containing missing values or > values outside the scale range (`geom_line()`) > > > > -- > *Roslinazairimah Zakaria* > *Tel: +609-5492370; Fax. No.+609-5492766* > > *Email: roslinazairimah at ump.edu.my <roslinazairimah at ump.edu.my>; > roslinaump at gmail.com <roslinaump at gmail.com>* > Faculty of Industrial Sciences & Technology > University Malaysia Pahang > Lebuhraya Tun Razak, 26300 Gambang, Pahang, Malaysia > > [[alternative HTML version deleted]] > > ______________________________________________ > R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide > https://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. >-- OpenPGP: https://hasan.d8u.us/openpgp.asc If you wish to request my time, please do so using *bit.ly/hd1AppointmentRequest <http://bit.ly/hd1AppointmentRequest>*. Si vous voudriez faire connnaisance, allez a *bit.ly/hd1AppointmentRequest <http://bit.ly/hd1AppointmentRequest>*. <https://sks-keyservers.net/pks/lookup?op=get&search=0xFEBAD7FFD041BBA1>Sent from my mobile device Envoye de mon portable [[alternative HTML version deleted]]