Shell 这是什么语言?
源文件名为“ReadOutputFile.m” 这看起来像Matlab(或自由等效倍频程) 你会想,找到编程语言有多容易。Shell 这是什么语言?,shell,Shell,源文件名为“ReadOutputFile.m” 这看起来像Matlab(或自由等效倍频程) 你会想,找到编程语言有多容易。 只要知道后缀就可以了。它看起来有点像一个声音分析器。那么,你发现了什么?没什么用。问题是“这是什么语言?”答案是“M”。这不是很明显吗?除了它不是M。它很明显是Matlab或类似的东西。对不起。我只是想帮忙。我不是最伟大的程序员,我只是想我能解决你的问题。 function ReadOutputFile(inputFile, outputFile) SPIT = 2; R
只要知道后缀就可以了。它看起来有点像一个声音分析器。那么,你发现了什么?没什么用。问题是“这是什么语言?”答案是“M”。这不是很明显吗?除了它不是M。它很明显是Matlab或类似的东西。对不起。我只是想帮忙。我不是最伟大的程序员,我只是想我能解决你的问题。
function ReadOutputFile(inputFile, outputFile)
SPIT = 2;
R_REGULARITY = 8;
%read input, threshold, and level
spitclip = wavread(inputFile);
spitclip = spitclip*(2^15);
fid = fopen('threshBinary.bin', 'rb', 'native');
thresh = fread(fid, 'int16');
fclose(fid);
fid = fopen('signalLevelBinary.bin', 'rb', 'native');
lvl = fread(fid, 'int16');
fclose(fid);
%get start and stop information from output file
outputNumeric = csvread(outputFile);
starts = outputNumeric(:,1);
stops = outputNumeric(:,2);
types = outputNumeric(:,8);
reasons = outputNumeric(:,9);
regularity = outputNumeric(:,7);
indicesOfSpits = find(types==SPIT);
numEvents = length(starts);
eventGate = zeros(1,length(spitclip));
firstSpits = zeros(1,length(spitclip));
chainedSpits = zeros(1,length(spitclip));
maxVal = 800;
%loop through events and plot spits only
%color code by reason
for n = 1:length(indicesOfSpits)
i = indicesOfSpits(n);
if(reasons(i) == R_REGULARITY)
chainedSpits(starts(i):stops(i)) = regularity(i)*800;
else
firstSpits(starts(i):stops(i)) = maxVal;
end
end
plot(spitclip);
hold on;
grid on;
plot(lvl,'r');
plot(thresh, 'y');
plot(firstSpits, 'm');
plot(chainedSpits, 'k');