551e5924-2b55-4abb-a37e-84c981929799 8 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

vx vy a b c plotG a char ≡ b size ≡ c color ≡ 13 mat n vx length : plot vx 1 el vy 1 el a b c augment : i 2 n range plot plot vx i el vy i el a b c augment stack : for plot 51 line :

N r Poly n 1 N range z n el r i 2 * π N / * n * exp * : for stack to close polygon v z z 1 el stack : v Re v Im augment 41 line :

N 7 : r 1 : 12 mat

Display only N r Poly 0.6235 0.7818 0.2225 - 0.9749 0.901 - 0.4339 0.901 - 0.4339 - 0.2225 - 0.9749 - 0.6235 0.7818 - 151015 -^* 0.6235 0.7818 82 mat

xy N r Poly :

spool to file

CWD C:\SmathFile CurrentDirectory :

data UnestCol v data 1 el : j 2 data cols range v v data j el augment : for v 31 line :

xy CWD nPoly wfile 1

data CWD nPoly rfile :

XY data UnestCol :

pts XY 1 col XY 2 col . 14 red plotG :

N r Poly pts 2 1 sys