Bubble Sort in R
R
Versuch einen Bubble Sort in R zu schreiben, als IDE wurde Visual Studio 2017 verwendet.
ElementsCount <- 10
Array <- list()
for (v in seq(1,ElementsCount))
Array <- sample(1000,10)
print(Array)
l <- length(Array)
print(l)
j = 10
while (j > 0) {
i <- 1
while (i < j) {
if (Array[i] > Array[i + 1]) {
p <- Array[i + 1]
Array[i + 1] <- Array[i]
Array[i] <- p
}
i <- i+1
}
j <- j - 1
}
print(Array)
Gruß JJR
Kategorie Versuch einen Bubble Sort in R zu schreiben, als IDE wurde Visual Studio 2017 verwendet.
ElementsCount <- 10
Array <- list()
for (v in seq(1,ElementsCount))
Array <- sample(1000,10)
print(Array)
l <- length(Array)
print(l)
j = 10
while (j > 0) {
i <- 1
while (i < j) {
if (Array[i] > Array[i + 1]) {
p <- Array[i + 1]
Array[i + 1] <- Array[i]
Array[i] <- p
}
i <- i+1
}
j <- j - 1
}
print(Array)
Gruß JJR