source: plugins/calculate_t1r_map.m @ 67

Last change on this file since 67 was 45, checked in by tjniskan, 11 years ago
  • Changed a small thing in license notices

M an2_export_gui.m
M an2_cellsprintf.m
M an2_getfilefilter.m
M an2_calc_wait.m
M an2_smiswrite.m
M misclib/spectrsum.m
M misclib/shiftind.m
M misclib/nifti4dto3d.m
M misclib/nifti3dto4d.m
M misclib/dcm_info.m
M misclib/addicon.m
M misclib/makelcmraw.m
M an2_check_file_exist.m
M an2_iseven.m
M an2_cellwrite.m
M an2_wbar.m
M an2_rot3d.m
M an2_readfdf.m
M an2_revision.m
M an2_viewprocpar.m
M an2_checkcthdr.m
M an2_readprocpar.m
M an2_fitmaps.m
M an2_read_nifti.m
M an2_data_read.m
M an2_smisread.m
M an2_resviewer.m
M an2_maptool.m
M aedes.m
M an2_helpabout.m
M an2_res2table.m
M an2_copy_roi.m
M plugins/save_roi_as_mask.m
M plugins/write_difference_images.m
M plugins/plot_profile.m
M plugins/calculate_t2_map.m
M plugins/calculate_t1r_map.m
M plugins/view_kspace.m
M plugins/copy_data_to_workspace.m
M plugins/take_snapshot.m
M an2_inputdlg.m
M an2_roi_copy_gui.m
M an2_readctdata.m
M an2_readfid.m
M an2_readfidprefs.m
M an2_readtab.m
M an2_check_updates.m
M an2_killfigs.m
M an2_roi_stats.m
M an2_saveres.m
M an2_rotateflip.m
M an2_juigetfiles.m
M an2_gui_defaults.m
M an2_editstack.m
M an2_errordump.m
M an2_update.m
M an2_write_nifti.m

File size: 2.1 KB
Line 
1function calculate_t1r_map(DATA,ROI,AddInfo)
2% This Aedes plugin calculates T1 rho map
3
4% This function is a part of Aedes - A graphical tool for analyzing
5% medical images
6%
7% Copyright (C) 2006 Juha-Pekka Niskanen <Juha-Pekka.Niskanen@uku.fi>
8%
9% Department of Physics, Department of Neurobiology
10% University of Kuopio, FINLAND
11%
12% This program may be used under the terms of the GNU General Public
13% License version 2.0 as published by the Free Software Foundation
14% and appearing in the file LICENSE.TXT included in the packaging of
15% this program.
16%
17% This program is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
18% WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
19
20fit_vals = [];
21if AddInfo.isDataMixed
22  nSlices = length(DATA);
23else
24  nSlices = size(DATA{1}.FTDATA,3);
25 
26  % Try to get fit values from PROCPAR.pi
27%   if isfield(DATA{1},'PROCPAR') && ~isempty(DATA{1}.PROCPAR) && ...
28%         isfield(DATA{1}.PROCPAR,'pi') && length(DATA{1}.PROCPAR.pi)>1
29%     fit_vals = DATA{1}.PROCPAR.pi./1000;
30%   end
31end
32
33% If fit values could not be determined, prompt user
34% if isempty(fit_vals)
35%   done = false;
36%   while ~done
37    resp = an2_inputdlg('Type spin-lock values');
38    if isempty(resp)
39      return
40    else
41      resp=resp{1};
42      fit_vals = str2num(resp);
43%       if length(fit_vals)<2 || rem(nSlices,length(fit_vals))~=0
44%         h=errordlg('Number of spin-lock values does not match with the data size!',...
45%                  'Spin-lock number mismatch','modal');
46%         uiwait(h)
47%       else
48%         done=true;
49%       end
50    end
51%   end
52% end
53
54% Prompt for file name
55[fname,fpath,findex]=uiputfile({'*.t1r;*.T1R;*.s1r;*.S1R',...
56                    'T1R-Files (*.t1r, *.s1r)';...
57                    '*.*','All Files (*.*)'},...
58                               'Save T1R-file',[DATA{1}.HDR.fpath, ...
59                    't1r_map']);
60if isequal(fname,0) || isequal(fpath,0)
61  return
62end
63
64% Calculate the map
65[fp,fn,fe]=fileparts([fpath,fname]);
66try
67  fitmaps(DATA,'t1r',fit_vals,'FileName',[fp,filesep,fn]);
68catch
69  errordlg({'Could not calculate maps. The following error was returned',...
70           '',lasterr},'modal')
71end
72
73
Note: See TracBrowser for help on using the repository browser.

Powered by Trac 1.0.9.Copyright © Juha-Pekka Niskanen 2008