For clarity sake. More show (with example closer to reality), less tell.
:^)
## Current:
> library(knitr)
> library(tidyverse)
── Conflicts
─────────────────────────────────────────────────────────────────────
tidyverse_conflicts() ──
x dplyr::filter() masks stats::filter()
x dplyr::lag() masks stats::lag()
> library(tibble)
> library(dplyr)
>
> testset <- as_tibble(tribble(~SN, ~Section, ~Order, ~Observation, ~Seq,
~Label, ~Value,
+ 2, "For Reporting Quarter", 1, "One", 1,
"Western", 163,
+ 2, "For Reporting Quarter", 1, "One", 2,
"Northern", 105,
+ 2, "For Reporting Quarter", 1, "One", 3,
"Eastern", 121,
+ 2, "For Reporting Quarter", 1, "One", 4,
"Southern", 74,
+ 2, "For Reporting Quarter", 2, "Two", 1,
"Western", 147,
+ 2, "For Reporting Quarter", 2, "Two", 2,
"Northern", 100,
+ 2, "For Reporting Quarter", 2, "Two", 3,
"Eastern", 106,
+ 2, "For Reporting Quarter", 2, "Two", 4,
"Southern", 70,
+ 2, "For Reporting Quarter", 3, "Three", 1,
"Western", 119,
+ 2, "For Reporting Quarter", 3, "Three", 2,
"Northern", 82,
+ 2, "For Reporting Quarter", 3, "Three", 3,
"Eastern", 90,
+ 2, "For Reporting Quarter", 3, "Three", 4,
"Southern", 65))
> testset %>% select(Observation, Label, Value) %>% spread(key=Observation,
value=Value)
# A tibble: 4 x 4
Label One Three Two
<chr> <dbl> <dbl> <dbl>
1 Eastern 121 90 106
2 Northern 105 82 100
3 Southern 74 65 70
4 Western 163 119 147
>
## Intended:
# A tibble: 4 x 4
For Reporting Quarter One Two Three
<chr> <dbl> <dbl> <dbl>
1 Western 163 147 119
2 Northern 105 100 82
3 Eastern 121 106 90
4 Southern 74 70 65
>
##
Unfortunately I don't know how to get there from here. Section, Order and
Seq are there to assist with getting the data to the right output
programmatically, however I don't know how to make use of them.
Hope this helps.
--
Cheers,
Joel Maxuel
On Mon, Oct 22, 2018 at 6:18 PM Jeff Newmiller <jdnew...@dcn.davis.ca.us>
wrote:
> If you are willing to work in the context of LaTeX output then perhaps you
> will find the "tables" package useful. However, while you think you have
> communicated clearly enough regarding what you want to accomplish, I do
> not, so either someone else will intuit what you want or you will create a
> mock-up of what you want your output to look like to remove the guesswork.
>
>
[[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.
