fork download
copy 
  1. s=@(m,n)[a=ones(n,1)*n;b=ones(m,1)*m].*[b;a]'
  2.  
  3. s(4,3)
  4.  
  5. s(3,0)
  6.  
  7. s(1,3)
  8.  
Success #stdin #stdout #stderr 0.19s 65048KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
s =

@(m, n) [a = ones(n, 1) * n; b = ones(m, 1) * m] .* [b; a]'

ans =

   12   12   12   12    9    9    9
   12   12   12   12    9    9    9
   12   12   12   12    9    9    9
   16   16   16   16   12   12   12
   16   16   16   16   12   12   12
   16   16   16   16   12   12   12
   16   16   16   16   12   12   12

ans =

   9   9   9
   9   9   9
   9   9   9

ans =

   3   9   9   9
   3   9   9   9
   3   9   9   9
   1   3   3   3
stderr
copy 
warning: product: automatic broadcasting operation applied
warning: product: automatic broadcasting operation applied
warning: product: automatic broadcasting operation applied
https://ideone.com/Ube8ft
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!