function S = discrete2softmax( D,Vals )
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% convert a col-array of discrete value to softmax   %
% D: col-array                                       %
% Vals: list of possible values                      %
%  sontran2012                                       %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
S = zeros(size(D,1),size(Vals,2));
for i=1:size(D,1)
    S(i,find(Vals==D(i))) = 1;
end

end

