# M- The yearly M3-cometition data
# method - NAIVE2
# horizon- 2
# log_scale - FALSE
plot_actual(M, method = "NAIVE2", horizon = 1)

# M- The yearly M3-cometition data
# method - NAIVE2
# horizon- 2
# log_scale - TRUE
plot_actual(M, method = "NAIVE2", horizon = 1, log_scale = TRUE)

# M- The yearly M3-cometition data
# method - NAIVE2
# horizon- 2
# log_scale - FALSE
plot_mean(M, method = "NAIVE2", horizon = 1)

# M- The yearly M3-cometition data
# method - NAIVE2
# horizon- 2
# log_scale - TRUE
plot_mean(M, method = "NAIVE2", horizon = 1, log_scale = TRUE)

LS0tDQp0aXRsZTogIlJlc3VsdHMiDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQoNCmBgYHtyfQ0KIyBNLSBUaGUgeWVhcmx5IE0zLWNvbWV0aXRpb24gZGF0YQ0KIyBtZXRob2QgLSBOQUlWRTINCiMgaG9yaXpvbi0gMg0KIyBsb2dfc2NhbGUgLSBGQUxTRQ0KcGxvdF9hY3R1YWwoTSwgbWV0aG9kID0gIk5BSVZFMiIsIGhvcml6b24gPSAxKQ0KYGBgDQoNCmBgYHtyLCB3YXJuaW5nPUZBTFNFfQ0KIyBNLSBUaGUgeWVhcmx5IE0zLWNvbWV0aXRpb24gZGF0YQ0KIyBtZXRob2QgLSBOQUlWRTINCiMgaG9yaXpvbi0gMg0KIyBsb2dfc2NhbGUgLSBUUlVFDQpwbG90X2FjdHVhbChNLCBtZXRob2QgPSAiTkFJVkUyIiwgaG9yaXpvbiA9IDEsIGxvZ19zY2FsZSA9IFRSVUUpDQpgYGANCg0KDQpgYGB7cn0NCiMgTS0gVGhlIHllYXJseSBNMy1jb21ldGl0aW9uIGRhdGENCiMgbWV0aG9kIC0gTkFJVkUyDQojIGhvcml6b24tIDINCiMgbG9nX3NjYWxlIC0gRkFMU0UNCnBsb3RfbWVhbihNLCBtZXRob2QgPSAiTkFJVkUyIiwgaG9yaXpvbiA9IDEpDQpgYGANCg0KYGBge3IsIHdhcm5pbmc9RkFMU0V9DQojIE0tIFRoZSB5ZWFybHkgTTMtY29tZXRpdGlvbiBkYXRhDQojIG1ldGhvZCAtIE5BSVZFMg0KIyBob3Jpem9uLSAyDQojIGxvZ19zY2FsZSAtIFRSVUUNCnBsb3RfbWVhbihNLCBtZXRob2QgPSAiTkFJVkUyIiwgaG9yaXpvbiA9IDEsIGxvZ19zY2FsZSA9IFRSVUUpDQpgYGA=