代码搜索结果
找到约 10,000 项符合
Raspberry Pi 的代码
il3_8fun.m
% il3_8fun.m
function f=il3_8fun(x,p)
f=1/sqrt(2*pi)*exp((-(x-p).^2)/2).*log2(2./(1+exp(-2*x.*p)));
chap3_10plot.m
clear all;
close all;
L1=-pi/6;
L2=pi/6;
L=L2-L1;
T=L*1/1000;
x=L1:T:L2;
figure(1);
for i=1:1:3
gs=-[(x+pi/6-(i-1)*pi/6)/(pi/12)].^2;
u=exp(gs);
hold on;
plot(x,u);
end
xlab
chap9_7i.m
%Flight Simulator Servo System
clear all;
close all;
J=2;
b=0.5;
kv=2;
kp=15;
kd=6;
f1=(b+kd*kv);
f2=J;
F=1;
A=1;
t=[0:0.001:10]'; %Simulation time
r=A*sin(2*pi*F*t);
dr=2*pi
chap10_5plant.m
%S-function for continuous state equation
function [sys,x0,str,ts]=s_function(t,x,u,flag)
switch flag,
%Initialization
case 0,
[sys,x0,str,ts]=mdlInitializeSizes;
case 1,
sys=mdlDer
chap10_6s.m
function [sys,x0,str,ts] = spacemodel(t,x,u,flag)
switch flag,
case 0,
[sys,x0,str,ts]=mdlInitializeSizes;
case 1,
sys=mdlDerivatives(t,x,u);
case 3,
sys=mdlOutputs(t,x,u);
case
chap10_1s.m
function [sys,x0,str,ts] = spacemodel(t,x,u,flag)
switch flag,
case 0,
[sys,x0,str,ts]=mdlInitializeSizes;
case 3,
sys=mdlOutputs(t,x,u);
case {2,4,9}
sys=[];
otherwise
erro
chap10_5s.m
function [sys,x0,str,ts] = spacemodel(t,x,u,flag)
switch flag,
case 0,
[sys,x0,str,ts]=mdlInitializeSizes;
case 3,
sys=mdlOutputs(t,x,u);
case {2,4,9}
sys=[];
otherwise
erro
show_tan.c
#include
#include
void main(void)
{
double pi = 3.14159265;
printf("Tangent of pi is %f\n", tan(pi));
printf("Tangent of pi/4 is %f\n", tan(pi / 4.0));
}
ebp4.m
%BP网络实例4_用“提前停止”方法提高BP网络推广能力
%本例将用提前停止和训练函数TRAINGDX相结合来避免“过度拟合”产生的误差
close all
clear
clc
%使用的主要函数如下:
%NEWFF——生成一个新的前向神经网络
%TRAIN——对BP神经网络进行训练
%SIM——对BP神经网络进行仿真
disp('Press any key to start');
ex0429.f90
program ex0429
implicit none
real pi
parameter(pi=3.14159)
write(*,"(F4.2)") sin(pi/6)
end