Question

我被绊倒了试图创造一个如果, ELS环传递以下内容:

Subject: Date: Result:
AAA 02/01/12 10
AAA 02/02/12 12
AAA 02/03/12 14
BBB 02/01/12 25
BBB 02/02/12 26
BBB 02/03/12 27
CCC 01/01/12 66
CCC 01/02/12 70
CCC 01/03/12 75

我希望将这些资料移到各栏中,说明如下:

SUBJECT 01/01/12 01/02/12 01/03/12 02/01/12 02/02/12 02/03/12
AAA RESULT
BBB RESULT
CCC RESULT

每个列只应有一个日期,每行只应有一个主题。结果将匹配各自的主题,并放在适当的单元格中。数据可以包含从几个主题、日期和结果组成的数据。有些结果可能包含非数字值(NAN)。此外,主题和日期可以任意排列,主题可以由数字字符和字符串字符组成。

UPDATE @amro & superbest

If I had a text file with the date format:800317==mar/17/1980, How would I import this and modify the codes you ve written? THanks again.

Answer 1

这里的脚本应该做你想做的事:

% Clean up
clc
clear

% Hardcoded example input
input = {
     AAA      02/01/12     10
     AAA      02/02/12     12
     AAA      02/03/12     14
     BBB      02/01/12     25
     BBB      02/02/12     26
     BBB      02/03/12     27
     CCC      01/01/12     66
     CCC      01/02/12     70
     CCC      01/03/12     75
    };

% Figure out how many rows and columns there will be
header_row = unique(input(:, 2));
header_col = unique(input(:, 1));

% Pre-allocation for better performance
output = cell(length(header_col), length(header_row));

% Rearrange the array
for i = 1:size(input, 1)
    % Find to which date and subject this element belongs
    subject = find(strcmp(header_col, input{i, 1}));
    date = find(strcmp(header_row, input{i, 2}));

    % Put the value in the appropriate slot
    output{subject, date} = input{i, 3};
end

% Add header columns and rows and print the result
result = [[ SUBJECT  header_row ]; [header_col output]];

Answer 2

如果您将数据存储在“http://www.mathworks.com/help/toolbox/stats/datasetglass.html”中,则您正在寻找的就是“nofollow”>>datastraction 对象,然后是“a href=” http://www.mathworks.com/help/toolbox/stats/dataset.unstack.html”。 rel=“nofollow”>unstack 的方法(有时被称为高至全局转换)。

我设计了一个简单的例子,说明在没有数据集类的情况下如何做到这一点:

%# cell array: subjects, dates, values
data = {
     AA   2012-05-01  0.1
     AA   2012-05-03  0.2
     BB   2012-05-02  0.3
     CC   2012-05-01  0.4
     CC   2012-05-02  0.5
     CC   2012-05-03  0.6
};

[subjects,~,subjectsMap] = unique(data(:,1));
[dates,~,datesMap] = unique(data(:,2));
M = nan(numel(subjects),numel(dates));
for i=1:numel(subjects)
    %# get all rows with subject == subject_i
    rIdx = (subjectsMap == i);
    %# fill values at this row for the specified columns
    M(i,datesMap(rIdx)) = cell2mat(data(rIdx,3));
end

D = cell(size(M)+1);
D(2:end,2:end) = num2cell(M);       %# fill values
D(1,2:end) = dates;                 %# column headers
D(2:end,1) = subjects;              %# row headers

这是在转换之前和之后的数据:

>> data
data = 
     AA      2012-05-01     [0.1]
     AA      2012-05-03     [0.2]
     BB      2012-05-02     [0.3]
     CC      2012-05-01     [0.4]
     CC      2012-05-02     [0.5]
     CC      2012-05-03     [0.6]

>> D
D = 
      []     2012-05-01      2012-05-02      2012-05-03 
     AA     [       0.1]    [       NaN]    [       0.2]
     BB     [       NaN]    [       0.3]    [       NaN]
     CC     [       0.4]    [       0.5]    [       0.6]

友情链接