kiangkiangkiang / ggesda Goto Github PK

R6Class(
  classname = "Luka",
  public = list(
    #' @field
    Me = "list",
    
    #' @description
    initialize = function(){
      print("Passion is the genesis of genius.")
      self$Me$UserName <- "Luka Jiang"
      self$Me$Code <- c("R", "Python")
      self$Me$Country <- "Taiwan"
      self$Me$Major <- "Statistics"
      self$Me$Ambitions <- "Data Scientist"
    },
    getSkill = function(){
      return(c("Data Visualization",
               "Statistical Analysis",
               "Machine learning"))
    },
    getSocial = function(){
      return(c("Twitch",
               "Line",
               "Facebook"))
    }
  )
)