I'm only seeing six dates, by the look of them five at one day intervals and the last three days later. According to my calendar those were weekdays in 2005. I don't see much "volatility" there and that's not a term I'm familiar with, I suspect it's econometric. I don't know what you're looking for and I think we're starting to get into issues about interpretation of data not issues about using R so off list. I think you need statistical or econometric support from somewhere.
Good luck! Chris On 02/05/2023 17:50, Upananda Pani wrote: > Hi Chrish, > > I am grateful to you for your reply. Your code is working fine. > Moreover, you have guided me how to improve my knowledge, I appreciate > it. I will be very careful next time. > The data which i am working on is given below: > > dput(head(data_vol3)) > structure(list(index = structure(c(12786, 12787, 12788, 12789, > 12790, 12793), tzone = "UTC", tclass = "Date", class = "Date"), > crepub = c(1.20601312, 1.176601845, 1.14945752, 1.112667506, > 1.076184043, 1.042147848), finland = c(0.614973309, 0.615008409, > 0.615034446, 0.615053761, 0.615068089, 0.615078717), france = > c(1.896830857, > 1.849908737, 1.807150091, 1.763296422, 1.719573044, 1.690600819 > ), germany = c(3.01041925, 2.892518667, 2.780918603, 2.672356826, > 2.567306135, 2.479892045), italy = c(0.345659867, 0.345675874, > 0.345686934, 0.345694578, 0.34569986, 0.34570351), netherlands = > c(0.509263785, > 0.509279495, 0.509289967, 0.509296947, 0.509301605, 0.509304705 > ), norway = c(1.052509528, 0.889357215, 0.784607722, 0.710551664, > 0.661473027, 0.629951323), poland = c(1.127163733, 1.12432629, > 1.087704091, 1.056705592, 1.024417693, 1.007962456), slovakia = > c(0.715652234, > 0.706087191, 0.706077173, 0.706104559, 0.70622666, 0.706098981 > ), slovenia = c(0.831886154, 0.831945994, 0.832003445, 0.832058602, > 0.832111556, 0.832162397), uk = c(1.504813191, 1.463648326, > 1.424235397, 1.38618692, 1.349628127, 1.318653737), usa = c(1.521675109, > 1.488286869, 1.451778376, 1.418378195, 1.384742397, 1.363477506 > )), row.names = c(NA, -6L), class = c("tbl_df", "tbl", "data.frame" > )) > > As there are some countries which are having higher volatilities than > countries with lower, is there any suggestion to improve the graph? > > Looking forward to your suggestion in this regard. > > With sincere regards, > Upananda Pani > > > On Tue, May 2, 2023 at 6:14 PM Chris Evans<chrish...@psyctc.org> wrote: >> I suspect that you have tried to pass your own data into the pivot_longer() >> function and your data probably doesn't have the rowN variable. >> >> First try running the whole of what I sent you. It definitively works for >> me. It gives me the attached graph. >> >> My code, using tribble() to read in the data you sent us, creates a rowN >> variable to save me the trouble of deleting those row numbers one by one. >> Then I drop that variable with that select(-rowN) line. >> >> Assuming that works for you running my code on that tiny dataset, and that >> you are trying to use the code on your full data frame, called data_vol3 >> then try this: >> >> data_vol3 %>% >> # select(-rowN) %>% # I have commented out this line >> pivot_longer(cols = -index, # as you want to pivot the other >> variables/columns >> names_to = "countries") -> tibDataVol3Long >> >> ggplot(data = tibDataVol3Long, >> aes(x = index, y = value, group = countries, colour = countries)) + >> geom_line() >> >> This is a very good illustration of why you should supply data using >> dput(data), dput(head(data)) if you have a large dataset. I know it doesn't >> feel a very sympathetic piece of advice, but I think you need to spend some >> days working on your understanding of R, ggplot and the tidyverse realm of >> R. You can use ggplot() without using much of the tidyverse but they are >> designed to complement each other and the more I understand of the tidyverse >> way of doing things, the better I use ggplot(). >> >> On 02/05/2023 13:44, Upananda Pani wrote: >> >> Hi Chris, >> >> Thank for your solutions and time. I am getting the following error >> while trying to execute the code you suggested. >> >> Error in select(., -rowN) : unused argument (-rowN) >> >> Regards, >> Upananda >> >> On Tue, May 2, 2023 at 3:08 PM Chris Evans via R-help >> <r-help@r-project.org> wrote: >> >> It's not clear what you want but ... >> >> On 02/05/2023 10:57, Upananda Pani wrote: >> >> Dear All, >> >> I have a dataset which contains date and 12 other countries data. I >> have extracted the data as xts object. >> >> I am not able to recall all the series in the Y axis. My data set >> looks like this >> >> index crepub finland france germany italy netherlands norway poland >> <date> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> >> 1 2005-01-03 1.21 0.615 1.90 3.01 0.346 0.509 1.05 1.13 >> 2 2005-01-04 1.18 0.615 1.85 2.89 0.346 0.509 0.889 1.12 >> 3 2005-01-05 1.15 0.615 1.81 2.78 0.346 0.509 0.785 1.09 >> 4 2005-01-06 1.11 0.615 1.76 2.67 0.346 0.509 0.711 1.06 >> 5 2005-01-07 1.08 0.615 1.72 2.57 0.346 0.509 0.661 1.02 >> 6 2005-01-10 1.04 0.615 1.69 2.48 0.346 0.509 0.630 1.01 >> >> My code for the same is as follows >> >> ggplot(data=data_vol3, aes(x=index, y=data_vol3$usa)+ >> geom_line()) >> >> Well you don't need to say that the y data are from data_vol3, your data >> = declaration says that. >> >> I wonder if what you want is: >> >> library(tidyverse) >> >> tribble( >> ~rowN, ~index, ~crepub, ~finland, ~france, ~germany, ~italy, >> ~netherlands, ~norway, ~poland, >> 1, "2005-01-03", 1.21, 0.615, 1.90, 3.01, 0.346, 0.509, 1.05, 1.13, >> 2, "2005-01-04", 1.18, 0.615, 1.85, 2.89, 0.346, 0.509, 0.889, 1.12, >> 3, "2005-01-05", 1.15, 0.615, 1.81, 2.78, 0.346, 0.509, 0.785, 1.09, >> 4, "2005-01-06", 1.11, 0.615, 1.76, 2.67, 0.346, 0.509, 0.711, 1.06, >> 5, "2005-01-07", 1.08, 0.615, 1.72, 2.57, 0.346, 0.509, 0.661, 1.02, >> 6, "2005-01-10", 1.04, 0.615, 1.69, 2.48, 0.346, 0.509, 0.630, 1.01) >> -> data_vol3 >> >> ### please give us data using dput in future: saves us having to do >> something like that to reclaim it! >> >> ### pivot that longer to make it easy to get country data as separate lines >> >> data_vol3 %>% select(-rowN) %>% >> pivot_longer(cols = -index, # as you want to pivot the other >> variables/columns >> names_to = "countries") -> tibDataVol3Long >> >> ggplot(data = tibDataVol3Long, >> aes(x = index, y = value, >> ### now get the grouping and use it for a colour legend >> group = countries, colour = countries)) + >> geom_line() >> >> Any help in this regard will be highly appreciated >> >> With regards, >> Upananda Pani >> >> ______________________________________________ >> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guide >> http://www.R-project.org/posting-guide.html >> and provide commented, minimal, self-contained, reproducible code. >> >> -- >> Chris Evans (he/him) >> Visiting Professor, UDLA, Quito, Ecuador & Honorary Professor, >> University of Roehampton, London, UK. >> Work web site:https://www.psyctc.org/psyctc/ >> CORE site:http://www.coresystemtrust.org.uk/ >> Personal site:https://www.psyctc.org/pelerinage2016/ >> Emeetings (Thursdays): >> <https://www.psyctc.org/pelerinage2016/>https://www.psyctc.org/psyctc/booking-meetings-with-me/ >> (Beware: French time, generally an hour ahead of UK) >> <https://ombook.psyctc.org/book> >> [[alternative HTML version deleted]] >> >> ______________________________________________ >> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guidehttp://www.R-project.org/posting-guide.html >> and provide commented, minimal, self-contained, reproducible code. >> >> -- >> Chris Evans (he/him) >> Visiting Professor, UDLA, Quito, Ecuador & Honorary Professor, University of >> Roehampton, London, UK. >> Work web site:https://www.psyctc.org/psyctc/ >> CORE site:http://www.coresystemtrust.org.uk/ >> Personal site:https://www.psyctc.org/pelerinage2016/ >> Emeetings (Thursdays):https://www.psyctc.org/psyctc/booking-meetings-with-me/ >> (Beware: French time, generally an hour ahead of UK) -- Chris Evans (he/him) Visiting Professor, UDLA, Quito, Ecuador & Honorary Professor, University of Roehampton, London, UK. Work web site: https://www.psyctc.org/psyctc/ CORE site: http://www.coresystemtrust.org.uk/ Personal site: https://www.psyctc.org/pelerinage2016/ Emeetings (Thursdays): <https://www.psyctc.org/pelerinage2016/>https://www.psyctc.org/psyctc/booking-meetings-with-me/ (Beware: French time, generally an hour ahead of UK) <https://ombook.psyctc.org/book> [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.