R forecast autoplot or hchart











up vote
0
down vote

favorite












would like to do multiple arima time series plot for each - Cooked and market - as shown in the image below. Have tried both autoplot and hchart but both does not work. Please advise and assist. Any help would be very much appreciated.



forecast1<-ts(lapply(arima, function(x) forecast(auto.arima(x), level=95)))

autoplot(forecast1)
hchart(forecast1)


Data:










share|improve this question




















  • 2




    Right now we can't tell exactly what your problem is or what you want your finished chart to look like - could you please edit your question to include reproducible data, specify what you mean by "does not work" (error message? or plot doesn't look as expected?), and show us what you want the plot to look like.
    – Jan Boyer
    Nov 9 at 16:29










  • Need a lot more info
    – jlbriggs
    Nov 11 at 18:17















up vote
0
down vote

favorite












would like to do multiple arima time series plot for each - Cooked and market - as shown in the image below. Have tried both autoplot and hchart but both does not work. Please advise and assist. Any help would be very much appreciated.



forecast1<-ts(lapply(arima, function(x) forecast(auto.arima(x), level=95)))

autoplot(forecast1)
hchart(forecast1)


Data:










share|improve this question




















  • 2




    Right now we can't tell exactly what your problem is or what you want your finished chart to look like - could you please edit your question to include reproducible data, specify what you mean by "does not work" (error message? or plot doesn't look as expected?), and show us what you want the plot to look like.
    – Jan Boyer
    Nov 9 at 16:29










  • Need a lot more info
    – jlbriggs
    Nov 11 at 18:17













up vote
0
down vote

favorite









up vote
0
down vote

favorite











would like to do multiple arima time series plot for each - Cooked and market - as shown in the image below. Have tried both autoplot and hchart but both does not work. Please advise and assist. Any help would be very much appreciated.



forecast1<-ts(lapply(arima, function(x) forecast(auto.arima(x), level=95)))

autoplot(forecast1)
hchart(forecast1)


Data:










share|improve this question















would like to do multiple arima time series plot for each - Cooked and market - as shown in the image below. Have tried both autoplot and hchart but both does not work. Please advise and assist. Any help would be very much appreciated.



forecast1<-ts(lapply(arima, function(x) forecast(auto.arima(x), level=95)))

autoplot(forecast1)
hchart(forecast1)


Data:







r highcharts arima forecast






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited Nov 9 at 22:21









s_t

2,9552928




2,9552928










asked Nov 9 at 16:02









Joyce

12




12








  • 2




    Right now we can't tell exactly what your problem is or what you want your finished chart to look like - could you please edit your question to include reproducible data, specify what you mean by "does not work" (error message? or plot doesn't look as expected?), and show us what you want the plot to look like.
    – Jan Boyer
    Nov 9 at 16:29










  • Need a lot more info
    – jlbriggs
    Nov 11 at 18:17














  • 2




    Right now we can't tell exactly what your problem is or what you want your finished chart to look like - could you please edit your question to include reproducible data, specify what you mean by "does not work" (error message? or plot doesn't look as expected?), and show us what you want the plot to look like.
    – Jan Boyer
    Nov 9 at 16:29










  • Need a lot more info
    – jlbriggs
    Nov 11 at 18:17








2




2




Right now we can't tell exactly what your problem is or what you want your finished chart to look like - could you please edit your question to include reproducible data, specify what you mean by "does not work" (error message? or plot doesn't look as expected?), and show us what you want the plot to look like.
– Jan Boyer
Nov 9 at 16:29




Right now we can't tell exactly what your problem is or what you want your finished chart to look like - could you please edit your question to include reproducible data, specify what you mean by "does not work" (error message? or plot doesn't look as expected?), and show us what you want the plot to look like.
– Jan Boyer
Nov 9 at 16:29












Need a lot more info
– jlbriggs
Nov 11 at 18:17




Need a lot more info
– jlbriggs
Nov 11 at 18:17












1 Answer
1






active

oldest

votes

















up vote
0
down vote













I took the step of turning the data into a time series before using the forecast algorithm. Then printing the chart is just a matter of using apply on the new list that is generated. Please see the code below.



Year <- seq(2012, 2018)
Cooked <- c(157.4, 157.2, 168.8, 192.3, 201.8, 233.4, 241.2)
Market <- c(51.7, 44.9, 49.5, 53.6, 57.2, 54.1, 53.5)
df <- as.data.frame(cbind(Year, Cooked, Market))
ts_df <- ts(df[, -1], start = 2012, frequency = 1)

library(forecast)
forecast1<-lapply(ts_df, function(x) forecast(auto.arima(x), level=95))

lapply(forecast1, function(x) autoplot(x))


I recommend in future questions, putting the data together in a similar script to help us help you.






share|improve this answer





















    Your Answer






    StackExchange.ifUsing("editor", function () {
    StackExchange.using("externalEditor", function () {
    StackExchange.using("snippets", function () {
    StackExchange.snippets.init();
    });
    });
    }, "code-snippets");

    StackExchange.ready(function() {
    var channelOptions = {
    tags: "".split(" "),
    id: "1"
    };
    initTagRenderer("".split(" "), "".split(" "), channelOptions);

    StackExchange.using("externalEditor", function() {
    // Have to fire editor after snippets, if snippets enabled
    if (StackExchange.settings.snippets.snippetsEnabled) {
    StackExchange.using("snippets", function() {
    createEditor();
    });
    }
    else {
    createEditor();
    }
    });

    function createEditor() {
    StackExchange.prepareEditor({
    heartbeatType: 'answer',
    convertImagesToLinks: true,
    noModals: true,
    showLowRepImageUploadWarning: true,
    reputationToPostImages: 10,
    bindNavPrevention: true,
    postfix: "",
    imageUploader: {
    brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
    contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
    allowUrls: true
    },
    onDemand: true,
    discardSelector: ".discard-answer"
    ,immediatelyShowMarkdownHelp:true
    });


    }
    });














    draft saved

    draft discarded


















    StackExchange.ready(
    function () {
    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53229245%2fr-forecast-autoplot-or-hchart%23new-answer', 'question_page');
    }
    );

    Post as a guest















    Required, but never shown

























    1 Answer
    1






    active

    oldest

    votes








    1 Answer
    1






    active

    oldest

    votes









    active

    oldest

    votes






    active

    oldest

    votes








    up vote
    0
    down vote













    I took the step of turning the data into a time series before using the forecast algorithm. Then printing the chart is just a matter of using apply on the new list that is generated. Please see the code below.



    Year <- seq(2012, 2018)
    Cooked <- c(157.4, 157.2, 168.8, 192.3, 201.8, 233.4, 241.2)
    Market <- c(51.7, 44.9, 49.5, 53.6, 57.2, 54.1, 53.5)
    df <- as.data.frame(cbind(Year, Cooked, Market))
    ts_df <- ts(df[, -1], start = 2012, frequency = 1)

    library(forecast)
    forecast1<-lapply(ts_df, function(x) forecast(auto.arima(x), level=95))

    lapply(forecast1, function(x) autoplot(x))


    I recommend in future questions, putting the data together in a similar script to help us help you.






    share|improve this answer

























      up vote
      0
      down vote













      I took the step of turning the data into a time series before using the forecast algorithm. Then printing the chart is just a matter of using apply on the new list that is generated. Please see the code below.



      Year <- seq(2012, 2018)
      Cooked <- c(157.4, 157.2, 168.8, 192.3, 201.8, 233.4, 241.2)
      Market <- c(51.7, 44.9, 49.5, 53.6, 57.2, 54.1, 53.5)
      df <- as.data.frame(cbind(Year, Cooked, Market))
      ts_df <- ts(df[, -1], start = 2012, frequency = 1)

      library(forecast)
      forecast1<-lapply(ts_df, function(x) forecast(auto.arima(x), level=95))

      lapply(forecast1, function(x) autoplot(x))


      I recommend in future questions, putting the data together in a similar script to help us help you.






      share|improve this answer























        up vote
        0
        down vote










        up vote
        0
        down vote









        I took the step of turning the data into a time series before using the forecast algorithm. Then printing the chart is just a matter of using apply on the new list that is generated. Please see the code below.



        Year <- seq(2012, 2018)
        Cooked <- c(157.4, 157.2, 168.8, 192.3, 201.8, 233.4, 241.2)
        Market <- c(51.7, 44.9, 49.5, 53.6, 57.2, 54.1, 53.5)
        df <- as.data.frame(cbind(Year, Cooked, Market))
        ts_df <- ts(df[, -1], start = 2012, frequency = 1)

        library(forecast)
        forecast1<-lapply(ts_df, function(x) forecast(auto.arima(x), level=95))

        lapply(forecast1, function(x) autoplot(x))


        I recommend in future questions, putting the data together in a similar script to help us help you.






        share|improve this answer












        I took the step of turning the data into a time series before using the forecast algorithm. Then printing the chart is just a matter of using apply on the new list that is generated. Please see the code below.



        Year <- seq(2012, 2018)
        Cooked <- c(157.4, 157.2, 168.8, 192.3, 201.8, 233.4, 241.2)
        Market <- c(51.7, 44.9, 49.5, 53.6, 57.2, 54.1, 53.5)
        df <- as.data.frame(cbind(Year, Cooked, Market))
        ts_df <- ts(df[, -1], start = 2012, frequency = 1)

        library(forecast)
        forecast1<-lapply(ts_df, function(x) forecast(auto.arima(x), level=95))

        lapply(forecast1, function(x) autoplot(x))


        I recommend in future questions, putting the data together in a similar script to help us help you.







        share|improve this answer












        share|improve this answer



        share|improve this answer










        answered Nov 9 at 16:42









        Richard Lusch

        421416




        421416






























            draft saved

            draft discarded




















































            Thanks for contributing an answer to Stack Overflow!


            • Please be sure to answer the question. Provide details and share your research!

            But avoid



            • Asking for help, clarification, or responding to other answers.

            • Making statements based on opinion; back them up with references or personal experience.


            To learn more, see our tips on writing great answers.





            Some of your past answers have not been well-received, and you're in danger of being blocked from answering.


            Please pay close attention to the following guidance:


            • Please be sure to answer the question. Provide details and share your research!

            But avoid



            • Asking for help, clarification, or responding to other answers.

            • Making statements based on opinion; back them up with references or personal experience.


            To learn more, see our tips on writing great answers.




            draft saved


            draft discarded














            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53229245%2fr-forecast-autoplot-or-hchart%23new-answer', 'question_page');
            }
            );

            Post as a guest















            Required, but never shown





















































            Required, but never shown














            Required, but never shown












            Required, but never shown







            Required, but never shown

































            Required, but never shown














            Required, but never shown












            Required, but never shown







            Required, but never shown







            這個網誌中的熱門文章

            Xamarin.form Move up view when keyboard appear

            Post-Redirect-Get with Spring WebFlux and Thymeleaf

            Anylogic : not able to use stopDelay()