Skip to content

Instantly share code, notes, and snippets.

@Rohit-Satyam
Created October 23, 2023 08:28
Show Gist options
  • Save Rohit-Satyam/59204b4edc2eadae4bbca7597a7bbc01 to your computer and use it in GitHub Desktop.
Save Rohit-Satyam/59204b4edc2eadae4bbca7597a7bbc01 to your computer and use it in GitHub Desktop.
dput(df_gg)
structure(list(group = c("Non-Saudi citizens Female", "Non-Saudi citizens Female", 
"Non-Saudi citizens Female", "Non-Saudi citizens Female", "Non-Saudi citizens Female", 
"Non-Saudi citizens Female", "Non-Saudi citizens Female", "Non-Saudi citizens Female", 
"Non-Saudi citizens Female", "Non-Saudi citizens Female", "Non-Saudi citizens Male", 
"Non-Saudi citizens Male", "Non-Saudi citizens Male", "Non-Saudi citizens Male", 
"Non-Saudi citizens Male", "Non-Saudi citizens Male", "Non-Saudi citizens Male", 
"Non-Saudi citizens Male", "Non-Saudi citizens Male", "Non-Saudi citizens Male", 
"Non-Saudi citizens Male", "Non-Saudi citizens unknown", "Saudi citizens Female", 
"Saudi citizens Female", "Saudi citizens Female", "Saudi citizens Female", 
"Saudi citizens Female", "Saudi citizens Female", "Saudi citizens Female", 
"Saudi citizens Female", "Saudi citizens Female", "Saudi citizens Female", 
"Saudi citizens Female", "Saudi citizens Male", "Saudi citizens Male", 
"Saudi citizens Male", "Saudi citizens Male", "Saudi citizens Male", 
"Saudi citizens Male", "Saudi citizens Male", "Saudi citizens Male", 
"Saudi citizens Male", "Saudi citizens Male", "Saudi citizens Male", 
"Saudi citizens Male", "Saudi citizens unknown", "Saudi citizens unknown", 
"Saudi citizens unknown", "Saudi citizens unknown", "Saudi citizens unknown", 
"Saudi citizens unknown"), age.group = structure(c(1L, 2L, 3L, 
4L, 5L, 6L, 7L, 8L, 9L, 10L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 
9L, 10L, 11L, 1L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 
1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 12L, 1L, 4L, 5L, 
6L, 7L, 8L), levels = c("-1", "0", "10", "20", "30", "40", "50", 
"60", "70", "80", "90", "100"), class = "factor"), Count = c(12L, 
5L, 6L, 38L, 82L, 63L, 47L, 36L, 19L, 5L, 23L, 1L, 8L, 21L, 45L, 
41L, 48L, 25L, 12L, 6L, 1L, 67L, 3L, 80L, 84L, 189L, 211L, 188L, 
130L, 89L, 52L, 24L, 9L, 2L, 74L, 76L, 165L, 246L, 221L, 199L, 
147L, 57L, 30L, 4L, 2L, 512L, 1L, 2L, 1L, 2L, 1L)), row.names = c(NA, 
-51L), groups = structure(list(group = c("Non-Saudi citizens Female", 
"Non-Saudi citizens Male", "Non-Saudi citizens unknown", "Saudi citizens Female", 
"Saudi citizens Male", "Saudi citizens unknown"), .rows = structure(list(
    1:10, 11:21, 22L, 23:33, 34:45, 46:51), ptype = integer(0), class = c("vctrs_list_of", 
"vctrs_vctr", "list"))), class = c("tbl_df", "tbl", "data.frame"
), row.names = c(NA, -6L), .drop = TRUE), class = c("grouped_df", 
"tbl_df", "tbl", "data.frame"))

@Rohit-Satyam
Copy link
Author

Or use

df_gg<- data.frame(group = c("Non-Saudi citizens Female", "Non-Saudi citizens Female", 
                     "Non-Saudi citizens Female", "Non-Saudi citizens Female", "Non-Saudi citizens Female", 
                     "Non-Saudi citizens Female", "Non-Saudi citizens Female", "Non-Saudi citizens Female", 
                     "Non-Saudi citizens Female", "Non-Saudi citizens Female", "Non-Saudi citizens Male", 
                     "Non-Saudi citizens Male", "Non-Saudi citizens Male", "Non-Saudi citizens Male", 
                     "Non-Saudi citizens Male", "Non-Saudi citizens Male", "Non-Saudi citizens Male", 
                     "Non-Saudi citizens Male", "Non-Saudi citizens Male", "Non-Saudi citizens Male", 
                     "Non-Saudi citizens Male", "Non-Saudi citizens unknown", "Saudi citizens Female", 
                     "Saudi citizens Female", "Saudi citizens Female", "Saudi citizens Female", 
                     "Saudi citizens Female", "Saudi citizens Female", "Saudi citizens Female", 
                     "Saudi citizens Female", "Saudi citizens Female", "Saudi citizens Female", 
                     "Saudi citizens Female", "Saudi citizens Male", "Saudi citizens Male", 
                     "Saudi citizens Male", "Saudi citizens Male", "Saudi citizens Male", 
                     "Saudi citizens Male", "Saudi citizens Male", "Saudi citizens Male", 
                     "Saudi citizens Male", "Saudi citizens Male", "Saudi citizens Male", 
                     "Saudi citizens Male", "Saudi citizens unknown", "Saudi citizens unknown", 
                     "Saudi citizens unknown", "Saudi citizens unknown", "Saudi citizens unknown", 
                     "Saudi citizens unknown"), 
           age.group = c(1L, 2L, 3L, 
                         4L, 5L, 6L, 7L, 8L, 9L, 10L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 
                         9L, 10L, 11L, 1L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 
                         1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 11L, 12L, 1L, 4L, 5L, 
                         6L, 7L, 8L),
           Count = c(12L, 
                     5L, 6L, 38L, 82L, 63L, 47L, 36L, 19L, 5L, 23L, 1L, 8L, 21L, 45L, 
                     41L, 48L, 25L, 12L, 6L, 1L, 67L, 3L, 80L, 84L, 189L, 211L, 188L, 
                     130L, 89L, 52L, 24L, 9L, 2L, 74L, 76L, 165L, 246L, 221L, 199L, 
                     147L, 57L, 30L, 4L, 2L, 512L, 1L, 2L, 1L, 2L, 1L))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment