View Single Post
Old 2012-01-01, 21:18   #39
science_man_88
 
science_man_88's Avatar
 
"Forget I exist"
Jul 2009
Dumbassville

8,369 Posts
Default

Quote:
Originally Posted by science_man_88 View Post
Code:
aliquotfile(w,s)=print("digraph G {");forprime(z=w,s,print("\""z"p\"""[shape=plaintext];"));print();forprime(y=w,s,print(ali(y)"[shape=plaintext];"))
is the closest I could get to work.


Code:
aliquotfile(w,s)=print("digraph G {");forprime(z=w,s,print("\""z"p\"""[shape=plaintext];"));print();forprime(y=w,s,for(x=1,#ali5(y),print(ali(y)[x]"[shape=plaintext];")))
gave me a negative amount of components in vector error
got one that skips some more than it's supposed to:

Code:
(w,s)->print("digraph G {");forprime(z=w,s,print("\""z"p\"""[shape=plaintext];"));print();forprime(y=w,s,if(#ali(y)>0,for(x=1,#ali5(y),print(ali(y)[x]"[shape=plaintext];"))));print("}")
science_man_88 is offline   Reply With Quote