fork download
copy 
  1. a = [1 3 5 7 8 9 10 15 16];
  2. b = [2 4 14];
  3.  
  4. c = bsxfun(@minus,b',a)
  5.  
  6. c(c<0)=nan;
  7. [~,ci] = min(c,[],2)
  8. d = a(ci)
Success #stdin #stdout 0.17s 65048KB
comments ()
stdin
copy 
Standard input is empty
stdout
copy 
c =

    1   -1   -3   -5   -6   -7   -8  -13  -14
    3    1   -1   -3   -4   -5   -6  -11  -12
   13   11    9    7    6    5    4   -1   -2

ci =

   1
   2
   7

d =

    1    3   10
https://ideone.com/s5IZ2e
language:
Octave (octave 4.4.1)
created:
11 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!