R, 1 byte
!
Ejemplo:
> !c(TRUE, FALSE)
[1] FALSE TRUE
También funciona con entrada numérica:
> !c(1, 0)
[1] FALSE TRUE
Tampoco estamos restringidos a matrices unidimensionales. Hagamos una matriz y rellene al azar con 0s y 1s:
> mat = matrix(rbinom(16, 1, .5), ncol=4)
> mat
[,1] [,2] [,3] [,4]
[1,] 0 1 1 1
[2,] 0 1 0 0
[3,] 0 0 0 0
[4,] 1 1 1 0
Podemos invertir esto con la misma facilidad:
> !mat
[,1] [,2] [,3] [,4]
[1,] TRUE FALSE FALSE FALSE
[2,] TRUE FALSE TRUE TRUE
[3,] TRUE TRUE TRUE TRUE
[4,] FALSE FALSE FALSE TRUE
Podemos continuar haciendo esto para números arbitrarios de dimensiones. Aquí hay un ejemplo en una matriz de cuatro dimensiones:
> bigarray = array(rbinom(32, 1, 0.5), dim=c(2,2,2,2))
> bigarray
, , 1, 1
[,1] [,2]
[1,] 0 0
[2,] 0 0
, , 2, 1
[,1] [,2]
[1,] 1 0
[2,] 0 0
, , 1, 2
[,1] [,2]
[1,] 0 1
[2,] 0 1
, , 2, 2
[,1] [,2]
[1,] 1 0
[2,] 1 1
> !bigarray
, , 1, 1
[,1] [,2]
[1,] TRUE TRUE
[2,] TRUE TRUE
, , 2, 1
[,1] [,2]
[1,] FALSE TRUE
[2,] TRUE TRUE
, , 1, 2
[,1] [,2]
[1,] TRUE FALSE
[2,] TRUE FALSE
, , 2, 2
[,1] [,2]
[1,] FALSE TRUE
[2,] FALSE FALSE
No funciona para los personajes, me temo.
> !"Hello world"
Error in !"Hello world" : Invalid argument type.
0
(falso, todos los 0 bits) y-1
(verdadero, todos los 1 bits)?