¿Cómo escribir un programa para el control cusum en lenguaje R?

¿Electricidad estática? void(int[]grupo)

{

int? Temperatura;

int? pos = 0;

for(int?I = 0;i<?group.length-1;i++)

{

pos = I

for(intj = I+1;j & ltgroup.length;j++)

{

if(grupo[j]<grupo[ pos])

{

pos = j;

}

}// El número I y la matriz más pequeña [pos] se intercambian.

temp = grupo[I];

grupo[I]= grupo[pos];

grupo[pos]= temp;

}

}