从品牌网站建设到网络营销策划,从策略到执行的一站式服务
R语言中,简单的S3和S4类的定义
成都创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:成都网站建设、成都做网站、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的河南网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!# S3 class
newstudent <- function(sid, sname, ssex){
tmp <- list(id = sid, name = sname, sex = ssex)
class(tmp) <- "student"
return(tmp)
}
print.student <- function(st){
cat(st$id, "\n")
cat(st$name, "\n")
cat(st$sex, "\n")
}
st = newstudent(11, "jack", "male")
#print(st)
st
# S4 class
setClass("student",
representation(
id = "numeric",
name = "character",
sex = "character"
))
# print is not a S4 generic. show methods are mapped to print for convenience, though.
setMethod("show", "student",
function(object){
cat(object@id, "\n")
cat(object@name, "\n")
cat(object@sex, "\n")
})
st = new("student", id = 41, name = "tom", sex = "male")
#print(st)
st
另外有需要云服务器可以了解下创新互联cdcxhl.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图