if (!any(q)) next
> z[s(which(q))] <- i
> break
> }
> }
> z
> }
> set.seed(1)
> plotMaze(makeMaze(10), main="Simple Maze")
> plotMaze(makeMaze(25), main="Hard Maze", lwd=1)
>
>
> -Original Me
main="Simple Maze")
plotMaze(makeMaze(25), main="Hard Maze", lwd=1)
-Original Message-
From: Peter Dalgaard [mailto:[EMAIL PROTECTED]
Sent: Tuesday, April 29, 2008 5:34 PM
To: McGehee, Robert
Cc: r-help
Subject: Re: [R] A Maze Generator
McGehee, Robert wrote:
> I ha
McGehee, Robert wrote:
I had some fun this afternoon coding up a 'maze generator' in R. I
thought I'd pass along the fruits of my labor for everyone's amusement.
As written, every point is connected to every other point, so feel free
to 'start' and 'finish' anywhere you like.
Have fun!
--Rober
I had some fun this afternoon coding up a 'maze generator' in R. I
thought I'd pass along the fruits of my labor for everyone's amusement.
As written, every point is connected to every other point, so feel free
to 'start' and 'finish' anywhere you like.
Have fun!
--Robert
PS. Feel free to pass
4 matches
Mail list logo
