fork download
copy 
  1. function f877(s)
  2.     if isempty(s), return, end
  3.     rows = [0 cumsum(s(1:end - 1) == sprintf('\n'))];
  4.     cols = cell2mat(arrayfun(@(r) {0:sum(rows == r) - 1}, unique(rows)));
  5.     pccr = @(c, col, row) fprintf({'' '[%c, %d, %d]\n'}{~isspace(c) + 1}, c, col, row);
  6.     arrayfun(pccr, s, cols, rows);
  7. end
  8. f877(sprintf('a b c\n\nd'))
  9.  
Success #stdin #stdout 0.26s 411712KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
[a, 0, 0]
[b, 2, 0]
[c, 4, 0]
[d, 0, 2]
https://ideone.com/psnXl5
language:
Octave (octave 4.4.1)
created:
5 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!