Shell Programming and Scripting

awk  'NR==1{len=split($0,X);next}
 {for(i=1;i<=NF;i++){
    t=x=0
    for(j=1;j<=len;j++){ 
    x=sqrt((X[j]-$i)*(X[j]-$i)) # if the value of X[j]-$i could be negative or positive, this calculation make this value to be absolute value, since there is no abs function in awk, ps. sqrt is SQuare Roo
       if(j==1){t=x}else{t=t<x?t:x}
       a[x]=X[j]}
       printf  t<=5?a[t]" ":"0 " # if abs value of X[j]-$i (t) is less than or equal to 5, accept as the closet value, if not, set it as 0
         delete a}       printf "\n"}'