euclidean <- function(A, B){ #Faster, still using the wikipedia description
repeat{
if(A == B) return(A)
if (A > B) A <- A - B else B <- B - A
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.