Sha256: 50b62805fa0bc5eb088332a0c5473ebb90653e01e1419414ff198a50bce0737a
Contents?: true
Size: 314 Bytes
Versions: 40
Compression:
Stored size: 314 Bytes
Contents
prime_factors <- function(number) {
factors <- c()
lowest.factor = 2
while (number > 1) {
if (number %% lowest.factor == 0) {
number <- number / lowest.factor
factors[length(factors) + 1] = lowest.factor
}
else {
lowest.factor <- lowest.factor + 1
}
}
return(factors)
}
Version data entries
40 entries across 40 versions & 1 rubygems