[R] tidyr gather(function)

[Eric Berger]

tempDat.long <- gather(data=tempDat, key=month, value=temp, "Jan",
"Feb","Mar", "Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") %>%
                         dplyr::mutate( monthIndex=match(month,month.abb))
%>%
                         dplyr::arrange( Year, monthIndex) %>%
                         dplyr::select( Year, month, temp )



On Tue, Jul 16, 2019 at 2:23 AM Patrick (Malone Quantitative) <
malone using malonequantitative.com> wrote:

> What happens if you use key=year?
>
> Also, tables get mangled when you post in HTML to plain-text list.
>
>
> On Mon, Jul 15, 2019 at 6:47 PM <reichmanj using sbcglobal.net> wrote:
> >
> > r-help
> >
> >
> >
> > Needing to transform some data for a time series (1930 - 2018).
> >
> >
> >
> > > tempDat
> > # A tibble: 89 x 13
> >     Year   Jan   Feb   Mar   Apr   May   Jun   Jul   Aug   Sep   Oct
>  Nov
> > Dec
> >    <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
> <dbl>
> > <dbl>
> >  1  1930  52    60.3  60.6  72.2  71.7  86.8  91.3  89.7  82.3  70.4
> 60.2
> > 52.2
> >  2  1931  52.9  57.8  62.7  72.4  80.5  87    95.1  89.3  85.9  72.8
> 57.2
> > 49.7
> >  3  1932  47    56.8  61.9  69.3  77.2  84.7  91.9  92.1  87    71.5
> 62.9
> > 49.3
> >
> > If I use the gather function:
> >
> >
> >
> > tempDat.long <- gather(data=tempDat, key=month, value=temp, "Jan", "Feb",
> > "Mar",
> >
> >
> > "Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
> >
> >
> >
> > > tempDat.long
> > # A tibble: 1,068 x 3
> >     Year month  temp
> >    <dbl> <chr> <dbl>
> >  1  1930 Jan    52
> >  2  1931 Jan    52.9
> >  3  1932 Jan    47
> >  4  1933 Jan    48.8
> >  5  1934 Jan    54.5
> >
> >
> >
> > But I need it to be
> >
> >
> >
> >     Year month  temp
> >    <dbl> <chr> <dbl>
> >  1  1930 Jan    xx.x
> >  2  1930 Feb    xx.x
> >  3  1930 Mar    xx.x
> >  4  1930 Apr    xx.x
> >  5  1930 May    xx.x
> >
> >
> >
> > So would I need to use the lubridate package to rearrange my data or is
> > there a more straight forward method?
> >
> >
> >
> >
> >
> > Jeff Reichman
> >
> >
> >         [[alternative HTML version deleted]]
> >
> > ______________________________________________
> > R-help using 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.
>
> ______________________________________________
> R-help using 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.
>

	[[alternative HTML version deleted]]