bubble sort

sort.cpp

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
NumericVector bubbleSort(NumericVector a){
    //sorting a numeric vector in to a ascending list//
    int j, flag, vectorSize = a.size();
    double tempVal;
    NumericVector sortedVector(clone(a));
    NumericVector finalIndex(vectorSize);

    while(true) {
        flag = 0;
        for (j = 0 ; j < (vectorSize - 1); j++){
            if (sortedVector[j+1] < sortedVector[j]){
                flag  ++ ;
                tempVal = sortedVector[j];
                sortedVector[j] = sortedVector[j+1];
                sortedVector[j+1] = tempVal;
            }
        }
        if (flag == 0)
            break;
    }

    return(sortedVector);
}