在MatLab中重复试验

Question

我对Matlab还是很陌生，但真的想改进。 对于我的实验，我想显示一张图片，参与者使用两个不同的键（f＆g）对是/否做出响应，然后显示下一张图片，然后重复进行。

展示图片，使用按键可以工作很长时间，但是我无法重复进行尝试。 因此，我的问题是我如何才能使程序重复/循环进行试验？ 到目前为止，我的代码有什么问题吗？还是我应该使用其他代码？

到目前为止，这是我的代码

function try1_6()

cleanupObj= onCleanup(@() myCleanupFxn);

% PRETEST
% Initialize screen with black background
winID = Screen('openWindow',0, [0 0 0]);

%Parameter
backcol=255;
textcol=0;

% Load image file(s)
structimages= [];
TheImagesdir = dir('theImagesdir/*.jpg');
for i=1: length(TheImagesdir);
    TheImages  = imread(['theImagesdir/' TheImagesdir(i).name], 'JPEG');

    % Get width and height
    imageX = size(TheImages,2);
    imageY = size(TheImages,1);

    % Convert to texture
    myTexture = Screen('MakeTexture', winID, TheImages);

    % Set destination rectangle
    destRect = [50  100  50+imageX  100+imageY];

    %save to structure
    structimages(end+1).filename=TheImagesdir(i).name;
    structimages(end).destRect= destRect;
    structimages(end).texture= myTexture;
end

%Make triallist
numberOfItems= [5]; %list of all possible items
Nrepeats=4;
Response=0;
TrialList=HH_mkTrialList({numberOfItems Response},Nrepeats); 


%PRESENTATION

for trialnum=1:size(TrialList,1)
    nitems = TrialList(trialnum,1);

    Screen('FillRect', winID,backcol); % makes the screen blank

    %displays text
    DrawFormattedText(winID,'dkjfghaslkdfglksdjgfh','center','center',textcol);
    Screen('Flip', winID)
    HH_waitForKeyPress({'space'}); % waits for spacebar to be pressed
    Screen('FillRect',winID,backcol);
    Screen('Flip',winID);
    WaitSecs(1);

    %display picture
    whichTheImages= randi(length(TheImagesdir)); % randomly selects image for directory
    Screen('FillRect',winID,backcol);
    Screen('DrawTexture', winID, myTexture, [], destRect);

    Screen('Flip', winID);
    HH_waitForKeyPress({'f','j'},5)

    if resp==-1
       break
    end 

    TrialList(trialnum,4)= response; %records response

end

end

function myCleanupFxn()
    Screen('CloseAll')
end

Answer 1

您的代码有很多问题需要解决。 首先，在声明/初始化之前使用TrialList 。 Make triallist代码块似乎在for循环的主体中TrialList ，应该在循环TrialList之前将其放置。

您的第二个问题是加载图像的内部for循环。 现在，它将在每次试用时加载在目录中找到的所有图像！ 您没有理由这样做，您也应该将此for循环放置在试用循环之外。 此外，您的原始代码从未按预期工作，因为您从未将加载的纹理保存在任何地方。 myTexture被文件夹中的最后一个图像覆盖，这是您将获得的唯一纹理。 因此，除了在循环之前预加载图像外，您还需要将它们保存在数据结构中，以便以后可以在试用循环中使用它们。 一个简单的struct在这里可以很好地工作：

structImages = [];
TheImagesdir = dir('theImagesdir/*.jpg');
for i = 1:length(TheImagesdir);
    TheImages  = imread(['theImagesdir/' TheImagesdir(i).name], 'JPEG');

    % Get width and height
    imageX = size(TheImages,2);
    imageY = size(TheImages,1);

    % Convert to texture
    myTexture = Screen('MakeTexture', winID, TheImages);

    % Set destination rectangle
    destRect = [50  100  50+imageX  100+imageY];

    %save to structure
    structImages(end+1).filename = TheImagesdir(i).name;
    structImages(end).destRect = destRect;
    structImages(end).texture = myTexture;
end

您的代码中还有其他不一致之处：

1. whichTheIamges已定义但未使用
2. resp在比较中使用的if resp==-1但不限定
3. response在定义之前已保存到TrialList

最后，最大的问题是Screen('CloseAll', winID); 在试用循环中，因此您在第一次试用后便会拆除整个演示平台。

仅供参考，正如我在评论中指出的那样，将整个脚本包装在try块中确实是一种糟糕的做法。 我怀疑您这样做是因为您希望能够使用Ctrl + C进行中间任务，但是有一种更好的方法。 如果使整个脚本成为一个函数，则只要函数退出（无论是正常，错误还是中断），都可以使用onCleanup方法执行代码。 方法如下：

function myScript()
%//make your script a function. There is an additional advantages to doing this: 
%//function performance is better than script performance.

%//blah-blah-blah

%//setup the cleanup object before opening screen
cleanupObj = onCleanup(@() myCleanupFxn);

%//open the screen
winID = Screen('openWindow',0, [0 0 0]);

%//blah-blah-blah

end

function myCleanupFxn()
    %//local function, not visible outside of this file
    Screen('CloseAll');
end