代码搜索结果
找到约 10,000 项符合
Raspberry Pi 的代码
examp8_16.m
x=[0,0.4,1 2,pi]; y=sin(x);
sp1=csapi(x,y); a=fnint(sp1,1); xx=fnval(a,[0,pi]); xx(2)-xx(1)
sp2=spapi(5,x,y); b=fnint(sp2,1); xx=fnval(b,[0,pi]); xx(2)-xx(1)
ezplot('-cos(t)+2',[0,pi]); hold on
examp3_30.m
f=inline('2/sqrt(pi)*exp(-x.^2)','x');
f=inline('2/sqrt(pi)*exp(-x.^2)','x');
y=quad(f,0,1.5) % 用 inline 函数定义被积函数
y=quad('c3ffun',0,1.5) % 用 m 函数定义被积函数
syms
examp2_25.m
t=0:.2:2*pi; y=sin(t); % 先生成绘图用数据
subplot(2,2,1), stairs(t,y) % 分割窗口,在左上角绘制阶梯曲线
subplot(2,2,2), stem(t,y) % 火柴杆曲线绘制
subplot(2,2,3), bar(t,y) % 直方图绘制
subplot(2,2,4), semilogx(t,y) % 横坐标为对数的曲线
examp10_20.m
t=0:0.03:2*pi; y=sin(t.^2); plot(t,y)
a=1:32; Z=cwt(y,a,'mexh','plot'); % 绘制绝对值图
surf(t,a,Z); shading flat; axis([0 2*pi,0,32,min(Z(:)) max(Z(:))])
examp8_5.m
x=[0:3*pi/2/200:3*pi/2]; y=cos(15*x);
I=quadspln(x,y,0,3*pi/2)
x0=[0:3*pi/2/1000:3*pi/2]; y0=cos(15*x0);
y1=interp1(x,y,x0,'spline'); plot(x,y,x0,y1,':')
fplotjb.m
clear
clc
subplot(2,2,1), fplot('humps',[0 1])
subplot(2,2,2), fplot('abs(exp(-j*x*(0:9))*ones(10,1))',[0 2*pi])
subplot(2,2,3), fplot('[tan(x),sin(x),cos(x)]',2*pi*[-1 1 -1 1])
subplot(2,2,4), f
shili05.m
function shili05
h0=figure('toolbar','none',...
'position',[200 150 450 250],...
'name','实例05');
t=0:pi/10:2*pi;
[x,y]=meshgrid(t);
subplot(2,2,1)
plot(sin(t),cos(t))
axis equal
sub
shili06.m
function shili06
h0=figure('toolbar','none',...
'position',[200 150 450 400],...
'name','实例06');
t=0:pi/10:2*pi;
h=plot(t,sin(t));
xlabel('t=0到2\pi','fontsize',16);
ylabel('sin(t)','fon
e_141_02.f90
real*8 a, pai, pi_
a=1.d-307; print *, a, 1./a; print *, tiny(a), huge(a)
b=1.e-39 ; print *, b, 1./b; print *, tiny(b), huge(b)
pi =3.14159265358979_8 ; print *, pi ! pi 无双精度定义,仍为单精度。
a =3.
e_121_02.f90
! ------求圆錐体积和表面积------
PROGRAM Example_1_2
REAL :: pi, r, h, v, s
pi = 3.141593
PRINT *,'Input radius r and height h ?'
READ *, r, h
v = pi*h*r**2/3.0
s = pi*r*(r + sqrt(r**2 + h**2))