data_m

% 데이터 평균 계산
% 입력: data 데이터 값, 출력: data_m 데이터 평균값
function data_m = data_mean(data)

  n = length(data); % n : 데이터 개수
  data_sum = sum(data); % data_sum : 데이터 합계
  data_m = data_sum/n; % data_m : 데이터 평균 값

end

# function data_m = data_mean(data)
#   # input:
#   #   data : data vector (1D array) Nx1, 1xN
#   # output:
#   #   data_m : mean of data

#   nn = length(data); % n : 데이터 개수
#   data_m = sum(data) / nn;

# end


# function data_m = data_mean(data)
#   # input:
#   #   data : data matrix (2D array) NxM (10000, 3)
#   # output:
#   #   data_m : mean of data (1xM)

#   nn = size(data, 1); % nn: length of data
#   mm = size(data, 2); % mm: number of case
  
#   data_m = zeros(1, mm);
#   data_m = zeros(mm, 1);
#   for j = 1:mm
#     data_m(j) = sum(data(:, j)) / nn;
#   end

# end

# pkg load statistics
# # data 100, 3
# # data_s 100, 1
# data = rand(100, 3);
# data_s = sum(data, 2);
# disp(size(data_s))

# data = rand(3, 100 );
# data_s = sum(data, 1);
# disp(size(data_s))