fork download 
  1. function n = f(a, b)
  2. 	if isempty(a) || isempty(b)
  3. 		n = numel(a);
  4. 	else
  5. 		n = f(a(find(a == b(1), 1):end), b(2:end));
  6. 	end
  7. end
  8. function tt = trick_or_treat(s)
  9. 	[trick treat] = deal(f(s, 'trick'), f(s, 'treat'));
  10. 	tt = {'trick' 'treat' 'none'}{[treat < trick trick < treat trick == treat]};
  11. end
  12. cellfun(@(s) disp(trick_or_treat(s)), {'trick or treat' '. tr ick' 'ttrriecatk' 'tri kc eat' 'my money'}');
Success #stdin #stdout 0.06s 44916KB
comments (?)
stdin 
Standard input is empty
stdout 
trick
trick
treat
treat
none
https://ideone.com/BkciwT
language:
Octave (octave 4.4.1)
created:
3 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

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