kahle() # a+b+...+z
kahle(r=2,p=1:2) # Kahle's original example
## example where mvp runs faster than spray (mvp does not need a 200x200 matrix):
k <- kahle(200,r=3,p=1:3,symbols=paste("x",sprintf("%02d",1:200),sep=""))
system.time(ignore <- k^2)
#system.time(ignore <- mvp_to_spray(k)^2) # needs spray package loaded
Run the code above in your browser using DataLab