155GIT1 / 7. cvičení: Porovnání verzí
mBez shrnutí editace |
mBez shrnutí editace |
||
(Nejsou zobrazeny 2 mezilehlé verze od stejného uživatele.) | |||
Řádek 6: | Řádek 6: | ||
# uživatelské funkce | # uživatelské funkce | ||
# chybová hlášení, nápověda k funkci | # chybová hlášení, nápověda k funkci | ||
# drobné | # drobné úlohy | ||
== Ukázky == | == Ukázky == | ||
Řádek 25: | Řádek 25: | ||
min_x = min(min(x)); | min_x = min(min(x)); | ||
max_x = max(max(x)); | max_x = max(max(x)); | ||
mean_x = mean(x(:)); % | mean_x = mean(x(:)); % stejný výsledek jako mean_x = mean(mean(x)) | ||
end | end | ||
Řádek 71: | Řádek 71: | ||
=== Drobné úlohy === | === Drobné úlohy === | ||
'''Funkce pro načtení neformátovaných dat po řádcích''' | '''Funkce pro načtení neformátovaných dat po řádcích''' | ||
Řádek 121: | Řádek 87: | ||
vstup = fopen(file,'r'); | vstup = fopen(file,'r'); | ||
filenew = [file(1:end-4), '_upr', file(end-3:end)]; % | filenew = [file(1:end-4), '_upr', file(end-3:end)]; % jméno nového souboru | ||
vystup = fopen(filenew,'w'); | vystup = fopen(filenew,'w'); | ||
konec = 0; % | konec = 0; % indentifikátor konce souboru | ||
while konec==0 | while konec==0 | ||
radek = fgets(vstup); % fgets() | radek = fgets(vstup); % fgets() načte 1 řádek souboru (se znakem \n) | ||
for i=1:length(radek) | for i=1:length(radek) | ||
if radek(i) == ',' | if radek(i) == ',' | ||
Řádek 133: | Řádek 99: | ||
end | end | ||
fprintf(vystup,'%s',radek); | fprintf(vystup,'%s',radek); | ||
konec = feof(vstup); % feof() | konec = feof(vstup); % feof() vrátí pro konec souboru hodnotu 1, jinak vrací hodnotu 0 | ||
end | end | ||
Řádek 140: | Řádek 106: | ||
</source> | </source> | ||
datový soubor [http:// | datový soubor [http://athena.fsv.cvut.cz:8000/GIT1/cv7/carky.txt carky.txt] ke stažení | ||
Volání funkce: | Volání funkce: |
Aktuální verze z 13. 4. 2023, 03:59
Uživatelské funkce
Náplň
- uživatelské funkce
- chybová hlášení, nápověda k funkci
- drobné úlohy
Ukázky
Uživatelské funkce
Syntax
function [vystup1,vystup2,...,vystupn] = nazev(vstup1,vstup2,...,vstupn) end % end neni povinne
Každá funkce musí být uložena ve vlastním souboru s příponou .m. Název souboru musí odpovídat názvu funkce! Klíčové slovo function musí být na prvním řádku souboru.
function [min_x, max_x, mean_x] = stat(x)
min_x = min(min(x));
max_x = max(max(x));
mean_x = mean(x(:)); % stejný výsledek jako mean_x = mean(mean(x))
end
Příklad volání
data = rand(5)
[mi, ma, mn] = stat(data);
fprintf('min = %.3f\nmax = %.3f\nmean = %.3f\n', mi, ma, mn)
Chybová hlášení, nápověda
function [min_x, max_x, mean_x] = stat(x)
% vypocet minimalni, maximalni a prumerne hodnoty matice
if any(any( imag(x)~=0 ))
error('stat: Vstupni matice obsahuje komplexni cisla.')
end
min_x = min(min(x));
max_x = max(max(x));
mean_x = mean(x(:));
end
Vyvolání nápovědy k uživatelské funkci:
help stat
Volání funkce (chybná vstupní data):
data1 = [data, 5+2i * ones(5,1)]
[mi, ma, mn] = stat(data1)
Příkaz return
- je-li v běhu funkce vykonán příkaz return, je okamžitě činnost funkce ukončena (bez vykonání evtl.dalších příkazů) a na pozici jejího volání jsou vráceny aktuálně vypočtené hodnoty výstupních parametrů funkce
Drobné úlohy
Funkce pro načtení neformátovaných dat po řádcích
např. záměna čárky za tečku:
function teckazacarku(file)
% vyhleda vsechny carky v souboru a zameni je za tecku
% IN: file ... jmeno vstupniho souboru (textovy retezec)
if ischar(file) == 0
error('Jmeno vstupniho souboru musi byt textovy retezec.');
end
vstup = fopen(file,'r');
filenew = [file(1:end-4), '_upr', file(end-3:end)]; % jméno nového souboru
vystup = fopen(filenew,'w');
konec = 0; % indentifikátor konce souboru
while konec==0
radek = fgets(vstup); % fgets() načte 1 řádek souboru (se znakem \n)
for i=1:length(radek)
if radek(i) == ','
radek(i) = '.';
end
end
fprintf(vystup,'%s',radek);
konec = feof(vstup); % feof() vrátí pro konec souboru hodnotu 1, jinak vrací hodnotu 0
end
fclose all;
fprintf('Data ulozena do souboru %s\n',filenew);
datový soubor carky.txt ke stažení
Volání funkce:
teckazacarku('carky.txt')