Archive

Posts Tagged ‘heart’

HappyValentinesDay

February 14th, 2013 Comments off

R code สำหรับวันแห่งความรัก 🙂

t<-seq(-pi, pi,0.05)

colors<-rainbow(length(t))

x<-16*sin(t)^3

y<-13*cos(t)-5*cos(2*t)-2*cos(3*t)-1*cos(4*t)

p<-c(“H”, “a”, “p”,”p”,”y”,”V”,”a”,”l”,”e”,”n”,”t”,”i”,”n”,”e”,”s”,”D”,”a”,”y”)

plot(x,y, type=”p”,pch=p,col=colors,xlab=”X”,ylab=”Y”)

heart R

You took my heart away :)

January 21st, 2013 Comments off

heart

hrt1

 

Happy Valentine’s Day!

February 14th, 2012 No comments

^_^

%d bloggers like this:
Locations of visitors to this page