Transformada arcseno em r (com exemplos)

Uma transformação arco-seno pode ser usada para “estender” pontos de dados entre valores 0 e 1.

Este tipo de transformação geralmente é utilizado quando se trata de proporções e porcentagens.

Podemos usar a seguinte sintaxe para realizar uma transformação de arco seno em R:

 asin(sqrt(x))

Os exemplos a seguir mostram como usar essa sintaxe na prática.

Exemplo 1: Transformação arco seno de valores entre 0 e 1

O código a seguir mostra como realizar uma transformação arco-seno em valores vetoriais entre 0 e 1:

 #definevector
x <- c(0.1, 0.33, 0.43, 0.5, 0.7)

#perform arcsine transformation on values in vector
asin(sqrt(x))

[1] 0.3217506 0.6119397 0.7151675 0.7853982 0.9911566

Exemplo 2: Transformação arco seno de valores fora do intervalo de 0 a 1

Observe que a transformação arco seno só funciona em valores entre 0 e 1. Portanto, se tivermos um vetor com valores fora desse intervalo, devemos primeiro converter cada valor para ficar entre 0 e 1.

 #define vector with values outside of range 0 to 1
x <- c(2, 14, 16, 30, 48, 78)

#create new vector where each value is divided by max value
y <- x / max(x)

#view new vector
y

[1] 0.02564103 0.17948718 0.20512821 0.38461538 0.61538462 1.00000000

#perform arcsine transformation on new vector
asin(sqrt(y))

[1] 0.1608205 0.4374812 0.4700275 0.6689641 0.9018323 1.5707963

Exemplo 3: Transformação Arcseno de valores no quadro de dados

O código a seguir mostra como realizar uma transformação arco-seno de valores em uma coluna específica de um quadro de dados:

 #define data frame
df <- data. frame (var1=c(.2, .3, .4, .4, .7),
                 var2=c(.1, .2, .2, .2, .3),
                 var3=c(.04, .09, .1, .12, .2))

#perform arcsine transformation on values in 'var1' column
asin(sqrt(df$var1))

[1] 0.4636476 0.5796397 0.6847192 0.6847192 0.9911566

E o código a seguir mostra como realizar uma transformação arco-seno de valores em múltiplas colunas de um quadro de dados:

 #define data frame
df <- data. frame (var1=c(.2, .3, .4, .4, .7),
                 var2=c(.1, .2, .2, .2, .3),
                 var3=c(.04, .09, .1, .12, .2))

#perform arcsine transformation on values in 'var1' and 'var3' columns
sapply(df[ c(' var1 ', ' var3 ')], function (x) asin(sqrt(x)))

          var1 var3
[1,] 0.4636476 0.2013579
[2,] 0.5796397 0.3046927
[3,] 0.6847192 0.3217506
[4,] 0.6847192 0.3537416
[5,] 0.9911566 0.4636476

Recursos adicionais

Como transformar dados em R (Log, raiz quadrada, raiz cúbica)
Como realizar uma transformação Box-Cox em R
Como usar a função de registro em R
Como usar a função raiz quadrada em R