Ideone.com

fork download

function a = f(s)
	o = rem([0 uint8(s) 0], 2) == 1;
	a = o(1:end-2) & o(3:end);
end
g = @(s) [uint8(s); f(s)];
g('')
g('a')
g('ab')
g('abc')

Success #stdin #stdout 0.1s 47572KB

stdin

Standard input is empty

stdout

ans = [](1x0)
ans =

  97
   0

ans =

  97  98
   0   0

ans =

  97  98  99
   0   1   0

https://ideone.com/mx954D

language:

Octave (octave 4.4.1)

created:

visibility:

secret

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!