2024年6月20日 星期四
2024年6月6日 星期四
2024年5月30日 星期四
2024年5月23日 星期四
2024年4月18日 星期四
2024年4月11日 星期四
2023年6月17日 星期六
2023年6月15日 星期四
2023年6月13日 星期二
2023年6月5日 星期一
2023年6月3日 星期六
2023年5月21日 星期日
2022年12月30日 星期五
2022年12月21日 星期三
2022年11月22日 星期二
2022年11月11日 星期五
2022年10月14日 星期五
2022年4月20日 星期三
R暫存
Paul.Family<-c(name,wife,no.kids,kids.age)
name
wife
no.kids
kids.age
#第三題
#(1)
TaipeP<-c(24.8,29.6,-4.8,-16.2)
#(2)
TaipeJ<-c(29729,23599,6130,26)
#(3)
TajonP<-c(14.6,14.5,0.1,0.7)
#(4)
TajonJ<-c(57435,16811,40624,241.7)
#(5)
ChinaP<-c(16.7,18.3,-1.6,-8.7)
#(6)
ChinaJ<-c(2044,304,1740,572.4)
#(7)
date<-c("4/13","4/14","4/15","4/16","4/17","4/18")
#(8)
demin<-c("台北二","台中市","高雄市")
#(9)
JG<-c(TaipeP,TajonP,ChinaP)
matrix(JG,nrow=3,ncol=4,byrow=T)
JE<-c(TaipeJ,TajonJ,ChinaJ)
matrix(JE,nrow=3,ncol=4,byrow=T)
series.name<-c("台北二","台中市","高雄市")
Merger<-c(date,demin)
matrix(Merger,nrow=3,ncol=6,byrow=T)