fork download
copy 
  1. da=...
  2. @(a)max(cumsum(92-(a(a>90))))
  3.  
  4. S1 = '[1]';
  5. S2 = '[1, 2, 3]';
  6. S3 = '[[1, 2, 3]]';
  7. S4 = '[3, [3, [3], 3], 3]';
  8. S5 = '[[[[1], 2], [3, [4]]]]';
  9. S6 = '[1, [[3]], [5, 6], [[[[8]]]], 1]';
  10. S7 = '[1, [[2, 3, [[4], 5], 6, [7, 8]], 9, [10, [[[11]]]], 12, 13], 14]';
  11. S8 = '[[[[[[[3]]]]]]]';
  12.  
  13. da(S1)
  14. da(S2)
  15. da(S3)
  16. da(S4)
  17. da(S5)
  18. da(S6)
  19. da(S7)
  20. da(S8)
  21.  
Success #stdin #stdout 0.47s 121792KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
da =

@(a) max (cumsum (92 - (a (a > 90))))

ans =  1
ans =  1
ans =  2
ans =  3
ans =  4
ans =  5
ans =  6
ans =  7
https://ideone.com/3LeGxV
language:
Octave (octave 4.4.1)
created:
8 years ago
visibility:
public

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!