sums of same string in different row in R












1















I want calculate of the sum of the same string values. This is my dataset:



trp_str <-  structure(
list(
V1 = list(
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic"),
c("Meninokki Duplex",
"Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton",
"Meninokki Duplex"),
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic")
),
V2 = list(
0.0712871287128713,
0.0633663366336634,
0.0475247524752475,
0.0475247524752475,
0.0633663366336634,
0.0712871287128713
)
),
row.names = c(2L, 4L, 8L, 11L, 12L, 13L),
class = "data.frame"
)


i want to get like this:



1   Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.14257426
2 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.06336634
3 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950495
4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.06336634


When I use the following function, R throws an error:



trp_str%>% group_by(V1) %>% summarise(Total = sum(V2)) show 

> Error in grouped_df_impl(data, unname(vars), drop) :
> Column `V1` can't be used as a grouping variable because it's a list









share|improve this question

























  • How did your dataset come about?

    – sindri_baldur
    Nov 21 '18 at 12:46











  • by select string which have 2 or more in a line

    – Kiran Pg
    Nov 21 '18 at 12:54
















1















I want calculate of the sum of the same string values. This is my dataset:



trp_str <-  structure(
list(
V1 = list(
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic"),
c("Meninokki Duplex",
"Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton",
"Meninokki Duplex"),
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic")
),
V2 = list(
0.0712871287128713,
0.0633663366336634,
0.0475247524752475,
0.0475247524752475,
0.0633663366336634,
0.0712871287128713
)
),
row.names = c(2L, 4L, 8L, 11L, 12L, 13L),
class = "data.frame"
)


i want to get like this:



1   Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.14257426
2 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.06336634
3 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950495
4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.06336634


When I use the following function, R throws an error:



trp_str%>% group_by(V1) %>% summarise(Total = sum(V2)) show 

> Error in grouped_df_impl(data, unname(vars), drop) :
> Column `V1` can't be used as a grouping variable because it's a list









share|improve this question

























  • How did your dataset come about?

    – sindri_baldur
    Nov 21 '18 at 12:46











  • by select string which have 2 or more in a line

    – Kiran Pg
    Nov 21 '18 at 12:54














1












1








1








I want calculate of the sum of the same string values. This is my dataset:



trp_str <-  structure(
list(
V1 = list(
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic"),
c("Meninokki Duplex",
"Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton",
"Meninokki Duplex"),
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic")
),
V2 = list(
0.0712871287128713,
0.0633663366336634,
0.0475247524752475,
0.0475247524752475,
0.0633663366336634,
0.0712871287128713
)
),
row.names = c(2L, 4L, 8L, 11L, 12L, 13L),
class = "data.frame"
)


i want to get like this:



1   Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.14257426
2 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.06336634
3 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950495
4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.06336634


When I use the following function, R throws an error:



trp_str%>% group_by(V1) %>% summarise(Total = sum(V2)) show 

> Error in grouped_df_impl(data, unname(vars), drop) :
> Column `V1` can't be used as a grouping variable because it's a list









share|improve this question
















I want calculate of the sum of the same string values. This is my dataset:



trp_str <-  structure(
list(
V1 = list(
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic"),
c("Meninokki Duplex",
"Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("BIG CUP UNIT CARTON",
"Merriboy Big Cup Carton",
"Merriboy Party Cup Carton"),
c("Santhigiri 450 Ml * 12 Nos Carton",
"Santhigiri Dahasanthi Master Carton",
"Meninokki Duplex"),
c("Hll Wallet Moods Choco 10’s Pic",
"Hll Wallet Moods Climaxdelay10’spic",
"Hll Wallet Moods Rose 10’s Pic")
),
V2 = list(
0.0712871287128713,
0.0633663366336634,
0.0475247524752475,
0.0475247524752475,
0.0633663366336634,
0.0712871287128713
)
),
row.names = c(2L, 4L, 8L, 11L, 12L, 13L),
class = "data.frame"
)


i want to get like this:



1   Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.14257426
2 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.06336634
3 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950495
4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.06336634


When I use the following function, R throws an error:



trp_str%>% group_by(V1) %>% summarise(Total = sum(V2)) show 

> Error in grouped_df_impl(data, unname(vars), drop) :
> Column `V1` can't be used as a grouping variable because it's a list






r






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited Nov 21 '18 at 12:48









sindri_baldur

8,2551033




8,2551033










asked Nov 21 '18 at 12:37









Kiran PgKiran Pg

239




239













  • How did your dataset come about?

    – sindri_baldur
    Nov 21 '18 at 12:46











  • by select string which have 2 or more in a line

    – Kiran Pg
    Nov 21 '18 at 12:54



















  • How did your dataset come about?

    – sindri_baldur
    Nov 21 '18 at 12:46











  • by select string which have 2 or more in a line

    – Kiran Pg
    Nov 21 '18 at 12:54

















How did your dataset come about?

– sindri_baldur
Nov 21 '18 at 12:46





How did your dataset come about?

– sindri_baldur
Nov 21 '18 at 12:46













by select string which have 2 or more in a line

– Kiran Pg
Nov 21 '18 at 12:54





by select string which have 2 or more in a line

– Kiran Pg
Nov 21 '18 at 12:54












1 Answer
1






active

oldest

votes


















1














You need to convert V1 into a string and convert V2 into a numeric. So, based on your expected answer you can do the following:



 trp_str %>% 
mutate( V2 = as.numeric(V2), V1 = sapply(V1, function(x) toString(x)) ) %>%
as_tibble() %>%
group_by(V1) %>%
summarise(sum = sum(V2))

# A tibble: 4 x 2
V1 sum
<chr> <dbl>
1 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950
2 Hll Wallet Moods Choco 10’s Pic, Hll Wallet Moods Climaxdelay10’spic, Hll Wallet Moods Rose 10’s Pic 0.143
3 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.0634
4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.0634





share|improve this answer























    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
    });


    }
    });














    draft saved

    draft discarded


















    StackExchange.ready(
    function () {
    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53412194%2fsums-of-same-string-in-different-row-in-r%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









    1














    You need to convert V1 into a string and convert V2 into a numeric. So, based on your expected answer you can do the following:



     trp_str %>% 
    mutate( V2 = as.numeric(V2), V1 = sapply(V1, function(x) toString(x)) ) %>%
    as_tibble() %>%
    group_by(V1) %>%
    summarise(sum = sum(V2))

    # A tibble: 4 x 2
    V1 sum
    <chr> <dbl>
    1 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950
    2 Hll Wallet Moods Choco 10’s Pic, Hll Wallet Moods Climaxdelay10’spic, Hll Wallet Moods Rose 10’s Pic 0.143
    3 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.0634
    4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.0634





    share|improve this answer




























      1














      You need to convert V1 into a string and convert V2 into a numeric. So, based on your expected answer you can do the following:



       trp_str %>% 
      mutate( V2 = as.numeric(V2), V1 = sapply(V1, function(x) toString(x)) ) %>%
      as_tibble() %>%
      group_by(V1) %>%
      summarise(sum = sum(V2))

      # A tibble: 4 x 2
      V1 sum
      <chr> <dbl>
      1 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950
      2 Hll Wallet Moods Choco 10’s Pic, Hll Wallet Moods Climaxdelay10’spic, Hll Wallet Moods Rose 10’s Pic 0.143
      3 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.0634
      4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.0634





      share|improve this answer


























        1












        1








        1







        You need to convert V1 into a string and convert V2 into a numeric. So, based on your expected answer you can do the following:



         trp_str %>% 
        mutate( V2 = as.numeric(V2), V1 = sapply(V1, function(x) toString(x)) ) %>%
        as_tibble() %>%
        group_by(V1) %>%
        summarise(sum = sum(V2))

        # A tibble: 4 x 2
        V1 sum
        <chr> <dbl>
        1 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950
        2 Hll Wallet Moods Choco 10’s Pic, Hll Wallet Moods Climaxdelay10’spic, Hll Wallet Moods Rose 10’s Pic 0.143
        3 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.0634
        4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.0634





        share|improve this answer













        You need to convert V1 into a string and convert V2 into a numeric. So, based on your expected answer you can do the following:



         trp_str %>% 
        mutate( V2 = as.numeric(V2), V1 = sapply(V1, function(x) toString(x)) ) %>%
        as_tibble() %>%
        group_by(V1) %>%
        summarise(sum = sum(V2))

        # A tibble: 4 x 2
        V1 sum
        <chr> <dbl>
        1 BIG CUP UNIT CARTON, Merriboy Big Cup Carton, Merriboy Party Cup Carton 0.0950
        2 Hll Wallet Moods Choco 10’s Pic, Hll Wallet Moods Climaxdelay10’spic, Hll Wallet Moods Rose 10’s Pic 0.143
        3 Meninokki Duplex, Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton 0.0634
        4 Santhigiri 450 Ml * 12 Nos Carton, Santhigiri Dahasanthi Master Carton, Meninokki Duplex 0.0634






        share|improve this answer












        share|improve this answer



        share|improve this answer










        answered Nov 21 '18 at 13:47









        avenger012avenger012

        37319




        37319
































            draft saved

            draft discarded




















































            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.




            draft saved


            draft discarded














            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53412194%2fsums-of-same-string-in-different-row-in-r%23new-answer', 'question_page');
            }
            );

            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







            Popular posts from this blog

            Guess what letter conforming each word

            Port of Spain

            Run scheduled task as local user group (not BUILTIN)