How to Order a geom_bar plot in r by a third category
I have a dataframe with 3 categories and I want to make a bar plot with count on the Y axis and seq on the x-axis, but ordered by depth (which goes much higher than 2) but I cannot figure out how to do it.
s <- df
head(s)
count depth seq
1 10 1 A
2 20 2 AA
3 30 1 TT
4 25 3 C
5 40 2 AAA
6 12 2 G
This is my feeble attempt:
ggplot(data = s, aes(x=as.factor(s$seq), y=count, color = depth)) +
geom_bar(stat="identity")
It goes without saying but I'm not very good at coding.
Thanks
r bioinformatics
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
asked Nov 15 '18 at 1:07
ChrisChris
61
add a comment |
I have a dataframe with 3 categories and I want to make a bar plot with count on the Y axis and seq on the x-axis, but ordered by depth (which goes much higher than 2) but I cannot figure out how to do it.
s <- df
head(s)
count depth seq
1 10 1 A
2 20 2 AA
3 30 1 TT
4 25 3 C
5 40 2 AAA
6 12 2 G
This is my feeble attempt:
ggplot(data = s, aes(x=as.factor(s$seq), y=count, color = depth)) +
geom_bar(stat="identity")
It goes without saying but I'm not very good at coding.
Thanks
r bioinformatics
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
asked Nov 15 '18 at 1:07
ChrisChris
61
add a comment |
I have a dataframe with 3 categories and I want to make a bar plot with count on the Y axis and seq on the x-axis, but ordered by depth (which goes much higher than 2) but I cannot figure out how to do it.
s <- df
head(s)
count depth seq
1 10 1 A
2 20 2 AA
3 30 1 TT
4 25 3 C
5 40 2 AAA
6 12 2 G
This is my feeble attempt:
ggplot(data = s, aes(x=as.factor(s$seq), y=count, color = depth)) +
geom_bar(stat="identity")
It goes without saying but I'm not very good at coding.
Thanks
r bioinformatics
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
asked Nov 15 '18 at 1:07
ChrisChris
61
I have a dataframe with 3 categories and I want to make a bar plot with count on the Y axis and seq on the x-axis, but ordered by depth (which goes much higher than 2) but I cannot figure out how to do it.
s <- df
head(s)
count depth seq
1 10 1 A
2 20 2 AA
3 30 1 TT
4 25 3 C
5 40 2 AAA
6 12 2 G
This is my feeble attempt:
ggplot(data = s, aes(x=as.factor(s$seq), y=count, color = depth)) +
geom_bar(stat="identity")
It goes without saying but I'm not very good at coding.
Thanks
r bioinformatics
r bioinformatics
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
asked Nov 15 '18 at 1:07
ChrisChris
61
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
asked Nov 15 '18 at 1:07
ChrisChris
61
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
edited Nov 15 '18 at 5:07
jacky_learns_to_code
4712620
4712620
asked Nov 15 '18 at 1:07
ChrisChris
61
asked Nov 15 '18 at 1:07
ChrisChris
61
asked Nov 15 '18 at 1:07
ChrisChris
61
61
add a comment |
add a comment |
1 Answer
1
active
oldest
votes
We can use the reorder() function within the aes() i.e
> ggplot(data = s, aes(x=reorder(as.factor(seq), -depth), y=count, fill = depth)) +
geom_bar(stat = 'identity')
Data:
> dput(s)
structure(list(count = c(10, 20, 30, 25, 40, 12), depth = c(1,
2, 1, 3, 2, 2), seq = structure(c(1L, 2L, 6L, 4L, 3L, 5L), .Label = c("A",
"AA", "AAA", "C", "G", "TT"), class = "factor")), .Names = c("count",
"depth", "seq"), row.names = c(NA, -6L), class = "data.frame")
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
add a comment |
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',
autoActivateHeartbeat: false,
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
);
);
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53311030%2fhow-to-order-a-geom-bar-plot-in-r-by-a-third-category%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
We can use the reorder() function within the aes() i.e
> ggplot(data = s, aes(x=reorder(as.factor(seq), -depth), y=count, fill = depth)) +
geom_bar(stat = 'identity')
Data:
> dput(s)
structure(list(count = c(10, 20, 30, 25, 40, 12), depth = c(1,
2, 1, 3, 2, 2), seq = structure(c(1L, 2L, 6L, 4L, 3L, 5L), .Label = c("A",
"AA", "AAA", "C", "G", "TT"), class = "factor")), .Names = c("count",
"depth", "seq"), row.names = c(NA, -6L), class = "data.frame")
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
add a comment |
We can use the reorder() function within the aes() i.e
> ggplot(data = s, aes(x=reorder(as.factor(seq), -depth), y=count, fill = depth)) +
geom_bar(stat = 'identity')
Data:
> dput(s)
structure(list(count = c(10, 20, 30, 25, 40, 12), depth = c(1,
2, 1, 3, 2, 2), seq = structure(c(1L, 2L, 6L, 4L, 3L, 5L), .Label = c("A",
"AA", "AAA", "C", "G", "TT"), class = "factor")), .Names = c("count",
"depth", "seq"), row.names = c(NA, -6L), class = "data.frame")
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
add a comment |
We can use the reorder() function within the aes() i.e
> ggplot(data = s, aes(x=reorder(as.factor(seq), -depth), y=count, fill = depth)) +
geom_bar(stat = 'identity')
Data:
> dput(s)
structure(list(count = c(10, 20, 30, 25, 40, 12), depth = c(1,
2, 1, 3, 2, 2), seq = structure(c(1L, 2L, 6L, 4L, 3L, 5L), .Label = c("A",
"AA", "AAA", "C", "G", "TT"), class = "factor")), .Names = c("count",
"depth", "seq"), row.names = c(NA, -6L), class = "data.frame")
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
We can use the reorder() function within the aes() i.e
> ggplot(data = s, aes(x=reorder(as.factor(seq), -depth), y=count, fill = depth)) +
geom_bar(stat = 'identity')
Data:
> dput(s)
structure(list(count = c(10, 20, 30, 25, 40, 12), depth = c(1,
2, 1, 3, 2, 2), seq = structure(c(1L, 2L, 6L, 4L, 3L, 5L), .Label = c("A",
"AA", "AAA", "C", "G", "TT"), class = "factor")), .Names = c("count",
"depth", "seq"), row.names = c(NA, -6L), class = "data.frame")
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
answered Nov 15 '18 at 1:49
jacky_learns_to_codejacky_learns_to_code
4712620
4712620
add a comment |
add a comment |
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.
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53311030%2fhow-to-order-a-geom-bar-plot-in-r-by-a-third-category%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
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
