How to write generic function with two inputs?How to sort a dataframe by multiple column(s)How to join (merge) data frames (inner, outer, left, right)Grouping functions (tapply, by, aggregate) and the *apply familyHow to make a great R reproducible exampleArguments and classes for writing (generic) functions in RWriting generic function for tables that works when the input happens to be vectorHow to retrieve formals of a primitive function?Error within function using solve() in RSubsetting data as generic function in RWriting if / ifelse function in R

Mathematica command that allows it to read my intentions

What is the idiomatic way to say "clothing fits"?

Is it acceptable for a professor to tell male students to not think that they are smarter than female students?

What's the in-universe reasoning behind sorcerers needing material components?

Size of subfigure fitting its content (tikzpicture)

Short story with a alien planet, government officials must wear exploding medallions

What about the virus in 12 Monkeys?

How to write generic function with two inputs?

Is there an expression that means doing something right before you will need it rather than doing it in case you might need it?

What type of content (depth/breadth) is expected for a short presentation for Asst Professor interview in the UK?

Unlock My Phone! February 2018

How dangerous is XSS?

How do I handle a potential work/personal life conflict as the manager of one of my friends?

Do UK voters know if their MP will be the Speaker of the House?

How to prevent "they're falling in love" trope

What is the most common color to indicate the input-field is disabled?

What killed these X2 caps?

ssTTsSTtRrriinInnnnNNNIiinngg

Plagiarism or not?

Is it possible to create a QR code using text?

How seriously should I take size and weight limits of hand luggage?

Why doesn't using multiple commands with a || or && conditional work?

Can compressed videos be decoded back to their uncompresed original format?

How do I gain back my faith in my PhD degree?



How to write generic function with two inputs?


How to sort a dataframe by multiple column(s)How to join (merge) data frames (inner, outer, left, right)Grouping functions (tapply, by, aggregate) and the *apply familyHow to make a great R reproducible exampleArguments and classes for writing (generic) functions in RWriting generic function for tables that works when the input happens to be vectorHow to retrieve formals of a primitive function?Error within function using solve() in RSubsetting data as generic function in RWriting if / ifelse function in R













9















I am a newbee in programming, and I run into an issue with R about generic function: how to write it when there are multiple inputs?



For an easy example, for dataset and function



z <- c(2,3,4,5,8)
calc.simp <- function(a,x)a*x+8
# Test the function:
calc.simp(x=z,a=3)
[1] 14 17 20 23 32


Now I change the class of z:
class(z) <- 'simp'
How should I write the generic function 'calc' as there are two inputs?
My attempts and errors are below:



calc <- function(x) UseMethod('calc',x)
calc(x=z)
Error in calc.simp(x = z) : argument "a" is missing, with no default


And



calc <- function(x,y) UseMethod('calc',x,y)
Error in UseMethod("calc", x, y) : unused argument (y)


My confusion might be a fundamental one as I am just a beginner. Please help! Thank you very much!










share|improve this question







New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.















  • 1





    What do you expect to be returned from calc(x=z)? You aren't giving your function a value for a and your function depends on it. Also you can let your generic function know there may be other argumets with calc <- function(x, ...) UseMethod('calc',x)

    – MrFlick
    4 hours ago












  • What do you want your function to do? Your first function (calc.simp) still works even after changing the class of z.

    – Luis
    4 hours ago











  • @MrFlick I simply want to test whether my generic function can work! It helps me understand the dispatch mechanism better. The 'function(x,...)' works perfectly for my question. Thank you so much! :)

    – Branda Newbee
    4 hours ago












  • question is about dispatching? didn't see this keyword anywhere on this page, hence adding it here.

    – chinsoon12
    18 mins ago















9















I am a newbee in programming, and I run into an issue with R about generic function: how to write it when there are multiple inputs?



For an easy example, for dataset and function



z <- c(2,3,4,5,8)
calc.simp <- function(a,x)a*x+8
# Test the function:
calc.simp(x=z,a=3)
[1] 14 17 20 23 32


Now I change the class of z:
class(z) <- 'simp'
How should I write the generic function 'calc' as there are two inputs?
My attempts and errors are below:



calc <- function(x) UseMethod('calc',x)
calc(x=z)
Error in calc.simp(x = z) : argument "a" is missing, with no default


And



calc <- function(x,y) UseMethod('calc',x,y)
Error in UseMethod("calc", x, y) : unused argument (y)


My confusion might be a fundamental one as I am just a beginner. Please help! Thank you very much!










share|improve this question







New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.















  • 1





    What do you expect to be returned from calc(x=z)? You aren't giving your function a value for a and your function depends on it. Also you can let your generic function know there may be other argumets with calc <- function(x, ...) UseMethod('calc',x)

    – MrFlick
    4 hours ago












  • What do you want your function to do? Your first function (calc.simp) still works even after changing the class of z.

    – Luis
    4 hours ago











  • @MrFlick I simply want to test whether my generic function can work! It helps me understand the dispatch mechanism better. The 'function(x,...)' works perfectly for my question. Thank you so much! :)

    – Branda Newbee
    4 hours ago












  • question is about dispatching? didn't see this keyword anywhere on this page, hence adding it here.

    – chinsoon12
    18 mins ago













9












9








9


1






I am a newbee in programming, and I run into an issue with R about generic function: how to write it when there are multiple inputs?



For an easy example, for dataset and function



z <- c(2,3,4,5,8)
calc.simp <- function(a,x)a*x+8
# Test the function:
calc.simp(x=z,a=3)
[1] 14 17 20 23 32


Now I change the class of z:
class(z) <- 'simp'
How should I write the generic function 'calc' as there are two inputs?
My attempts and errors are below:



calc <- function(x) UseMethod('calc',x)
calc(x=z)
Error in calc.simp(x = z) : argument "a" is missing, with no default


And



calc <- function(x,y) UseMethod('calc',x,y)
Error in UseMethod("calc", x, y) : unused argument (y)


My confusion might be a fundamental one as I am just a beginner. Please help! Thank you very much!










share|improve this question







New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.












I am a newbee in programming, and I run into an issue with R about generic function: how to write it when there are multiple inputs?



For an easy example, for dataset and function



z <- c(2,3,4,5,8)
calc.simp <- function(a,x)a*x+8
# Test the function:
calc.simp(x=z,a=3)
[1] 14 17 20 23 32


Now I change the class of z:
class(z) <- 'simp'
How should I write the generic function 'calc' as there are two inputs?
My attempts and errors are below:



calc <- function(x) UseMethod('calc',x)
calc(x=z)
Error in calc.simp(x = z) : argument "a" is missing, with no default


And



calc <- function(x,y) UseMethod('calc',x,y)
Error in UseMethod("calc", x, y) : unused argument (y)


My confusion might be a fundamental one as I am just a beginner. Please help! Thank you very much!







r generic-programming






share|improve this question







New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.











share|improve this question







New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.









share|improve this question




share|improve this question






New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.









asked 5 hours ago









Branda NewbeeBranda Newbee

483




483




New contributor




Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.





New contributor





Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.






Branda Newbee is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.







  • 1





    What do you expect to be returned from calc(x=z)? You aren't giving your function a value for a and your function depends on it. Also you can let your generic function know there may be other argumets with calc <- function(x, ...) UseMethod('calc',x)

    – MrFlick
    4 hours ago












  • What do you want your function to do? Your first function (calc.simp) still works even after changing the class of z.

    – Luis
    4 hours ago











  • @MrFlick I simply want to test whether my generic function can work! It helps me understand the dispatch mechanism better. The 'function(x,...)' works perfectly for my question. Thank you so much! :)

    – Branda Newbee
    4 hours ago












  • question is about dispatching? didn't see this keyword anywhere on this page, hence adding it here.

    – chinsoon12
    18 mins ago












  • 1





    What do you expect to be returned from calc(x=z)? You aren't giving your function a value for a and your function depends on it. Also you can let your generic function know there may be other argumets with calc <- function(x, ...) UseMethod('calc',x)

    – MrFlick
    4 hours ago












  • What do you want your function to do? Your first function (calc.simp) still works even after changing the class of z.

    – Luis
    4 hours ago











  • @MrFlick I simply want to test whether my generic function can work! It helps me understand the dispatch mechanism better. The 'function(x,...)' works perfectly for my question. Thank you so much! :)

    – Branda Newbee
    4 hours ago












  • question is about dispatching? didn't see this keyword anywhere on this page, hence adding it here.

    – chinsoon12
    18 mins ago







1




1





What do you expect to be returned from calc(x=z)? You aren't giving your function a value for a and your function depends on it. Also you can let your generic function know there may be other argumets with calc <- function(x, ...) UseMethod('calc',x)

– MrFlick
4 hours ago






What do you expect to be returned from calc(x=z)? You aren't giving your function a value for a and your function depends on it. Also you can let your generic function know there may be other argumets with calc <- function(x, ...) UseMethod('calc',x)

– MrFlick
4 hours ago














What do you want your function to do? Your first function (calc.simp) still works even after changing the class of z.

– Luis
4 hours ago





What do you want your function to do? Your first function (calc.simp) still works even after changing the class of z.

– Luis
4 hours ago













@MrFlick I simply want to test whether my generic function can work! It helps me understand the dispatch mechanism better. The 'function(x,...)' works perfectly for my question. Thank you so much! :)

– Branda Newbee
4 hours ago






@MrFlick I simply want to test whether my generic function can work! It helps me understand the dispatch mechanism better. The 'function(x,...)' works perfectly for my question. Thank you so much! :)

– Branda Newbee
4 hours ago














question is about dispatching? didn't see this keyword anywhere on this page, hence adding it here.

– chinsoon12
18 mins ago





question is about dispatching? didn't see this keyword anywhere on this page, hence adding it here.

– chinsoon12
18 mins ago












1 Answer
1






active

oldest

votes


















8














I'd suggest you model your generic function off of the template used by innumerable base R functions as, e.g., mean:



> mean
function (x, ...)
UseMethod("mean")


In your case, that would translate to the following generic which (if I understand your question correctly) works just fine:



calc <- function(x, ...) UseMethod('calc')

calc.simp <- function(a, x)
x <- unclass(x)
a * x + 8



## Try it out

z <- c(2,3,4,5,8)
class(z) <- "simp"

calc.simp(x = z, 10)
## [1] 28 38 48 58 88

calc(x = z, 10)
## [1] 28 38 48 58 88





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



    );






    Branda Newbee is a new contributor. Be nice, and check out our Code of Conduct.









    draft saved

    draft discarded


















    StackExchange.ready(
    function ()
    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f55503025%2fhow-to-write-generic-function-with-two-inputs%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









    8














    I'd suggest you model your generic function off of the template used by innumerable base R functions as, e.g., mean:



    > mean
    function (x, ...)
    UseMethod("mean")


    In your case, that would translate to the following generic which (if I understand your question correctly) works just fine:



    calc <- function(x, ...) UseMethod('calc')

    calc.simp <- function(a, x)
    x <- unclass(x)
    a * x + 8



    ## Try it out

    z <- c(2,3,4,5,8)
    class(z) <- "simp"

    calc.simp(x = z, 10)
    ## [1] 28 38 48 58 88

    calc(x = z, 10)
    ## [1] 28 38 48 58 88





    share|improve this answer





























      8














      I'd suggest you model your generic function off of the template used by innumerable base R functions as, e.g., mean:



      > mean
      function (x, ...)
      UseMethod("mean")


      In your case, that would translate to the following generic which (if I understand your question correctly) works just fine:



      calc <- function(x, ...) UseMethod('calc')

      calc.simp <- function(a, x)
      x <- unclass(x)
      a * x + 8



      ## Try it out

      z <- c(2,3,4,5,8)
      class(z) <- "simp"

      calc.simp(x = z, 10)
      ## [1] 28 38 48 58 88

      calc(x = z, 10)
      ## [1] 28 38 48 58 88





      share|improve this answer



























        8












        8








        8







        I'd suggest you model your generic function off of the template used by innumerable base R functions as, e.g., mean:



        > mean
        function (x, ...)
        UseMethod("mean")


        In your case, that would translate to the following generic which (if I understand your question correctly) works just fine:



        calc <- function(x, ...) UseMethod('calc')

        calc.simp <- function(a, x)
        x <- unclass(x)
        a * x + 8



        ## Try it out

        z <- c(2,3,4,5,8)
        class(z) <- "simp"

        calc.simp(x = z, 10)
        ## [1] 28 38 48 58 88

        calc(x = z, 10)
        ## [1] 28 38 48 58 88





        share|improve this answer















        I'd suggest you model your generic function off of the template used by innumerable base R functions as, e.g., mean:



        > mean
        function (x, ...)
        UseMethod("mean")


        In your case, that would translate to the following generic which (if I understand your question correctly) works just fine:



        calc <- function(x, ...) UseMethod('calc')

        calc.simp <- function(a, x)
        x <- unclass(x)
        a * x + 8



        ## Try it out

        z <- c(2,3,4,5,8)
        class(z) <- "simp"

        calc.simp(x = z, 10)
        ## [1] 28 38 48 58 88

        calc(x = z, 10)
        ## [1] 28 38 48 58 88






        share|improve this answer














        share|improve this answer



        share|improve this answer








        edited 4 hours ago

























        answered 4 hours ago









        Josh O'BrienJosh O'Brien

        130k18280390




        130k18280390






















            Branda Newbee is a new contributor. Be nice, and check out our Code of Conduct.









            draft saved

            draft discarded


















            Branda Newbee is a new contributor. Be nice, and check out our Code of Conduct.












            Branda Newbee is a new contributor. Be nice, and check out our Code of Conduct.











            Branda Newbee is a new contributor. Be nice, and check out our Code of Conduct.














            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%2f55503025%2fhow-to-write-generic-function-with-two-inputs%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

            Are there any AGPL-style licences that require source code modifications to be public? Planned maintenance scheduled April 23, 2019 at 23:30 UTC (7:30pm US/Eastern) Announcing the arrival of Valued Associate #679: Cesar Manara Unicorn Meta Zoo #1: Why another podcast?Force derivative works to be publicAre there any GPL like licenses for Apple App Store?Do you violate the GPL if you provide source code that cannot be compiled?GPL - is it distribution to use libraries in an appliance loaned to customers?Distributing App for free which uses GPL'ed codeModifications of server software under GPL, with web/CLI interfaceDoes using an AGPLv3-licensed library prevent me from dual-licensing my own source code?Can I publish only select code under GPLv3 from a private project?Is there published precedent regarding the scope of covered work that uses AGPL software?If MIT licensed code links to GPL licensed code what should be the license of the resulting binary program?If I use a public API endpoint that has its source code licensed under AGPL in my app, do I need to disclose my source?

            2013 GY136 Descoberta | Órbita | Referências Menu de navegação«List Of Centaurs and Scattered-Disk Objects»«List of Known Trans-Neptunian Objects»

            Mortes em março de 2019 Referências Menu de navegação«Zhores Alferov, Nobel de Física bielorrusso, morre aos 88 anos - Ciência»«Fallece Rafael Torija, o bispo emérito de Ciudad Real»«Peter Hurford dies at 88»«Keith Flint, vocalista do The Prodigy, morre aos 49 anos»«Luke Perry, ator de 'Barrados no baile' e 'Riverdale', morre aos 52 anos»«Former Rangers and Scotland captain Eric Caldow dies, aged 84»«Morreu, aos 61 anos, a antiga lenda do wrestling King Kong Bundy»«Fallece el actor y director teatral Abraham Stavans»«In Memoriam Guillaume Faye»«Sidney Sheinberg, a Force Behind Universal and Spielberg, Is Dead at 84»«Carmine Persico, Colombo Crime Family Boss, Is Dead at 85»«Dirigent Michael Gielen gestorben»«Ciclista tricampeã mundial e prata na Rio 2016 é encontrada morta em casa aos 23 anos»«Pagan Community Notes: Raven Grimassi dies, Indianapolis pop-up event cancelled, Circle Sanctuary announces new podcast, and more!»«Hal Blaine, Wrecking Crew Drummer, Dies at 90»«Morre Coutinho, que editou dupla lendária com Pelé no Santos»«Cantor Demétrius, ídolo da Jovem Guarda, morre em SP»«Ex-presidente do Vasco, Eurico Miranda morre no Rio de Janeiro»«Bronze no Mundial de basquete de 1971, Laís Elena morre aos 76 anos»«Diretor de Corridas da F1, Charlie Whiting morre aos 66 anos às vésperas do GP da Austrália»«Morreu o cardeal Danneels, da Bélgica»«Morreu o cartoonista Augusto Cid»«Morreu a atriz Maria Isabel de Lizandra, de "Vale Tudo" e novelas da Tupi»«WS Merwin, prize-winning poet of nature, dies at 91»«Atriz Márcia Real morre em São Paulo aos 88 anos»«Mauritanie: décès de l'ancien président Mohamed Mahmoud ould Louly»«Morreu Dick Dale, o rei da surf guitar e de "Pulp Fiction"»«Falleció Víctor Genes»«João Carlos Marinho, autor de 'O Gênio do Crime', morre em SP»«Legendary Horror Director and SFX Artist John Carl Buechler Dies at 66»«Morre em Salvador a religiosa Makota Valdina»«مرگ بازیکن‌ سابق نساجی بر اثر سقوط سنگ در مازندران»«Domingos Oliveira morre no Rio»«Morre Airton Ravagniani, ex-São Paulo, Fla, Vasco, Grêmio e Sport - Notícias»«Morre o escritor Flavio Moreira da Costa»«Larry Cohen, Writer-Director of 'It's Alive' and 'Hell Up in Harlem,' Dies at 77»«Scott Walker, experimental singer-songwriter, dead at 76»«Joseph Pilato, Day of the Dead Star and Horror Favorite, Dies at 70»«Sheffield United set to pay tribute to legendary goalkeeper Ted Burgin who has died at 91»«Morre Rafael Henzel, sobrevivente de acidente aéreo da Chapecoense»«Morre Valery Bykovsky, um dos primeiros cosmonautas da União Soviética»«Agnès Varda, cineasta da Nouvelle Vague, morre aos 90 anos»«Agnès Varda, cineasta francesa, morre aos 90 anos»«Tania Mallet, James Bond Actress and Helen Mirren's Cousin, Dies at 77»e