How do i make a video of topoplots using EEGLAB in matlab?

How do I create a topographicplot video using EEGLAB in matlab?

I have 1000 topographicplots and I want to make a video out of it. Also, the radii of the circles in the plots do not match. i.e., some are elongated ones although the image size is the same for all the images. How do I make it all uniform and create a video out of it?

Answer 1

[Mehmet Eylem Kirlangic]

Have you tried using the function eegmovie() by EEGLab?

https://sccn.ucsd.edu/~arno/eeglab/auto/eegmovie.html

Answer 2

[Image Analyst]

Attached is a demo for how to create a movie from an axes that you update for different time points.

% Demo to create a movie file from a Gaussian and then optionally save it to disk as an avi video file.
%==============================================================================================
% Initialization code
clear all;
clc;
workspace;
numberOfFrames = 61;
x1d = linspace(-3, 3, numberOfFrames);
y1d = x1d;
t = linspace(0, 5, numberOfFrames);
hFigure = figure;

%==============================================================================================
% Set up the movie structure.
% Preallocate movie, which will be an array of structures.
% First get a cell array with all the frames.
allTheFrames = cell(numberOfFrames,1);
vidHeight = 344;
vidWidth = 446;
allTheFrames(:) = {zeros(vidHeight, vidWidth, 3, 'uint8')};
% Next get a cell array with all the colormaps.
allTheColorMaps = cell(numberOfFrames,1);
allTheColorMaps(:) = {zeros(256, 3)};
% Now combine these to make the array of structures.
myMovie = struct('cdata', allTheFrames, 'colormap', allTheColorMaps);
% Create a VideoWriter object to write the video out to a new, different file.
% writerObj = VideoWriter('problem_3.avi');
% open(writerObj);
% Need to change from the default renderer to zbuffer to get it to work right.
% openGL doesn't work and Painters is way too slow.
set(gcf, 'renderer', 'zbuffer');

%==============================================================================================
% Create the movie.
% Get a list of x and y coordinates for every pixel in the x-y plane.
[x, y] = meshgrid(x1d, y1d);
% After this loop starts, BE SURE NOT TO RESIZE THE WINDOW AS IT'S SHOWING THE FRAMES, or else you won't be able to save it.
for frameIndex = 1 : numberOfFrames
    z = exp(-(x-t(frameIndex)).^2-(y-t(frameIndex)).^2);
    cla reset;
    % Enlarge figure to full screen.
    % 	set(gcf, 'Units', 'Normalized', 'Outerposition', [0, 0, 1, 1]);
    surf(x,y,z);
    axis('tight')
    zlim([0, 1]);
    caption = sprintf('Frame #%d of %d, t = %.1f', frameIndex, numberOfFrames, t(frameIndex));
    title(caption, 'FontSize', 15);
    drawnow;
    thisFrame = getframe(gca);
    % Write this frame out to a new video file.
    %  	writeVideo(writerObj, thisFrame);
    myMovie(frameIndex) = thisFrame;
end
% close(writerObj);

%==============================================================================================
% See if they want to replay the movie.
message = sprintf('Done creating movie\nDo you want to play it?');
button = questdlg(message, 'Continue?', 'Yes', 'No', 'Yes');
drawnow;	% Refresh screen to get rid of dialog box remnants.
close(hFigure);
if strcmpi(button, 'Yes')
    hFigure = figure;
    % Enlarge figure to full screen.
    % set(gcf, 'Units', 'Normalized', 'Outerposition', [0, 0, 1, 1]);
    title('Playing the movie we created', 'FontSize', 15);
    % Get rid of extra set of axes that it makes for some reason.
    axis off;
    % Play the movie.
    movie(myMovie);
    close(hFigure);
end

%==============================================================================================
% See if they want to save the movie to an avi file on disk.
promptMessage = sprintf('Do you want to save this movie to disk?');
titleBarCaption = 'Continue?';
button = questdlg(promptMessage, titleBarCaption, 'Yes', 'No', 'Yes');
if strcmpi(button, 'yes')
    % Get the name of the file that the user wants to save.
    % Note, if you're saving an image you can use imsave() instead of uiputfile().
    startingFolder = pwd;
    defaultFileName = {'*.avi';'*.mp4';'*.mj2'}; %fullfile(startingFolder, '*.avi');
    [baseFileName, folder] = uiputfile(defaultFileName, 'Specify a file');
    if baseFileName == 0
        % User clicked the Cancel button.
        return;
    end
    fullFileName = fullfile(folder, baseFileName);
    % Create a video writer object with that file name.
    % The VideoWriter object must have a profile input argument, otherwise you get jpg.
    % Determine the format the user specified:
    [folder, baseFileName, ext] = fileparts(fullFileName);
    switch lower(ext)
        case '.jp2'
            profile = 'Archival';
        case '.mp4'
            profile = 'MPEG-4';
        otherwise
            % Either avi or some other invalid extension.
            profile = 'Uncompressed AVI';
    end
    writerObj = VideoWriter(fullFileName, profile);
    open(writerObj);
    % Write out all the frames.
    numberOfFrames = length(myMovie);
    for frameNumber = 1 : numberOfFrames 
 	   writeVideo(writerObj, myMovie(frameNumber));
    end
    close(writerObj);
    % Display the current folder panel so they can see their newly created file.
    cd(folder);
    filebrowser;
    message = sprintf('Finished creating movie file\n      %s.\n\nDone with demo!', fullFileName);
    uiwait(helpdlg(message));
else
    uiwait(helpdlg('Done with demo!'));
end

[Mehmet Eylem Kirlangic]

Thank you for the code!