Sha256: 675a60f9726822fe5e942ee9b28d1d56343c6fea5c438b6a3fc40a44a67f2319
Contents?: true
Size: 477 Bytes
Versions: 40
Compression:
Stored size: 477 Bytes
Contents
pascalsTriangle <- function(n) {
if (n == 0) {
return (list())
}
else if (n == 1) {
return (list(1))
}
else if (n == 2) {
return (list(1, c(1,1)))
}
else if (n >= 3) {
triangle <- list(1, c(1,1))
for (x in 3:n) {
row <- rep(1, x)
for (i in 2:(x-1)) {
row[i] = sum(triangle[[x-1]][(i-1):i])
}
triangle[[x]] = row
}
return (triangle)
}
else {
stop("argument n needs to be an integer")
}
}
Version data entries
40 entries across 40 versions & 1 rubygems