Warning, /education/cantor/src/backends/octave/scripts/cantor_plot2d.m is written in an unsupported language. File is not indexed.
0001 %{ 0002 Copyright (C) 2010 Miha Čančula <miha.cancula@gmail.com> 0003 0004 This program is free software; you can redistribute it and/or 0005 modify it under the terms of the GNU General Public License 0006 as published by the Free Software Foundation; either version 2 0007 of the License, or (at your option) any later version. 0008 0009 This program is distributed in the hope that it will be useful, 0010 but WITHOUT ANY WARRANTY; without even the implied warranty of 0011 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 0012 GNU General Public License for more details. 0013 0014 You should have received a copy of the GNU General Public License 0015 along with this program; if not, write to the Free Software 0016 Foundation, Inc., 51 Franklin Street, Fifth Floor, 0017 Boston, MA 02110-1301, USA. 0018 %} 0019 0020 function cantor_plot2d(f_string,var,min,max) 0021 f_mod_string = f_string; 0022 for op = ['*' '/' '^'] 0023 f_mod_string = strrep(f_mod_string, op, strcat('.',op)); 0024 endfor 0025 0026 f = str2func(strcat('@(', var, ')', f_mod_string)); 0027 x = linspace(min,max); 0028 plot (x, f(x)); 0029 0030 xlabel(var); 0031 ylabel(f_string); 0032 endfunction