Hola qué tal,soy estudiante universitaria, y apenas empezamos a ver el lenguaje R.
Mi profesor me dejó desarrollar un algoritmo para la siguiente problemática: Dado el siguiente vector [1,5,3,2,2,2,0]
Crear una función que etiquete a los que tengan la misma intensidad
[1,2,3,4,4,4,5]
Y otro vector que te indique el tamaño del vector original
[1,1,1,3,1]
Hasta el momento llevo este código que me logra realizar el etiquetado pero me falta el vector que me dé el tamaño
Funcion<-function(vector){
con=1
a=array()
b=array()
foro(i in 1:(length(vector)-1) )
if (vector[i]!=vector [i+1]){
a[i]=con
con=con+1}
else {
a[i]=con
con=con
}}
if((i+1)==length (vector)){
a[i+1]=con}
print(a)
}
El resultado que me da es 1234445