锘??xml version="1.0" encoding="utf-8" standalone="yes"?> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <stdlib.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> #include <math.h> 鏂囩珷鍑哄錛?a >http://www.diybl.com/course/3_program/c/c_js/2007925/73590.html int a[X][Y]; void matrix(int b[][X],int c[][Y]);
]]>
int abs( int num );
double fabs( double arg );
long labs( long num );
鍑芥暟榪斿洖num鐨勭粷瀵瑰?/p>
double acos( double arg );
鍑芥暟榪斿洖arg鐨勫弽浣欏雞鍊鹼紝arg鐨勫煎簲璇ュ湪-1鍒?涔嬮棿
double asin( double arg );
鍑芥暟榪斿洖arg鐨勫弽姝e雞鍊鹼紝arg鐨勫煎簲璇ュ湪-1鍒?涔嬮棿
double atan( double arg );
鍑芥暟榪斿洖arg鐨勫弽姝e垏鍊?/p>
double atan2( double y, double x );
鍑芥暟榪斿洖y/x鐨勫弽姝e垏鍊鹼紝騫朵笖瀹冨彲浠ラ氳繃x錛寉鐨勭鍙峰垽鏂?br> 錛坸錛寉錛夋墍琛ㄧず鐨勮薄闄愶紝鍏惰繑鍥炵殑涔熸槸瀵瑰簲璞¢檺鐨勮搴﹀?/p>
double ceil( double num );
double floor( double arg );
ceil鍑芥暟榪斿洖涓嶅皬浜巒um鐨勬渶灝忔暣鏁幫紝濡俷um = 6.04, 鍒欒繑鍥?.0
floor鍑芥暟榪斿洖涓嶅ぇ浜巒um鐨勬渶澶х殑鏁幫紝濡俷um = 6.04, 鍒欒繑鍥?.0
double cos( double arg );
double sin( double arg );
double tan( double arg );
鍑芥暟鍒嗗埆榪斿洖arg鐨勪綑寮︼紝姝e雞錛屾鍒囧鹼紝arg閮芥槸鐢ㄥ姬搴﹁〃紺?/p>
double cosh( double arg );
double sinh( double arg );
double tanh( double arg );
鍑芥暟鍒嗗埆榪斿洖arg鐨勫弻鏇蹭綑寮︼紝鍙屾洸姝e雞錛屽弻鏇叉鍒囷紝arg閮芥槸鐢ㄥ姬搴﹁〃紺虹殑
double fmod( double x, double y );
鍑芥暟榪斿洖x/y鐨勪綑鏁?/p>
div_t div( int numerator, int denominator );
ldiv_t ldiv( long numerator, long denominator );
鍑芥暟榪斿洖numerator/demominator鎿嶄綔鐨勶紝榪斿洖涓涓粨鏋勪綋div_t(ldiv_t)
div_t(ldiv_t)緇撴瀯浣撲腑瀹氫箟浜唓uot(鍟?,rem(浣欐暟)
double exp( double arg );
鍑芥暟榪斿洖e(鑷劧搴曟暟)鐨刟rg嬈?/p>
double log( double num );
鍑芥暟榪斿洖num鐨勮嚜鐒跺鏁板糿um搴斾負澶т簬0鐨勬暟
double log10( double num );
鍑芥暟榪斿洖num浠?0涓哄簳鐨勫鏁板鹼紝num涔熷簲璇ヤ負澶т簬0鐨勬暟
double pow( double base, double exp );
鍑芥暟榪斿洖浠ase涓哄簳鐨別xp嬈★紝涓嶅厑璁哥殑鍙栧艱寖鍥?
褰揵ase 涓?0 涓攅xp 灝忎簬鎴栫瓑浜?0
褰揵ase 涓?璐熸暟 涓?exp 涓嶄負鏁存暟
double sqrt( double num );
鍑芥暟榪斿洖num鐨勫紑鏂瑰鹼紝num搴旇涓轟笉灝忎簬0鐨勫?/p>
double frexp( double num, int* exp );
鍑芥暟鍙互鑾峰彇縐戝璁℃暟娉曠殑鍙傛暟
鍑芥暟榪斿洖鍦?.5鍒?.0涔嬮棿鐨勫鹼紝 浼犲叆exp鐨勫弬鏁扮敤浜庤繑鍥瀗um鐨勬寚鏁?br> (浠?涓哄簳鏁拌綆楋紝鍗籌細num = mantissa * (2 ^ exp))
double ldexp( double num, int exp );
鍑芥暟榪斿洖num*(2^exp)鐨勫鹼紝濡傛灉緇撴灉婧㈠嚭錛岃繑鍥濰UGE_VAL
double modf( double num, double *i );
鍑芥暟鍒嗗壊num錛屽皢鏁存暟閮ㄥ垎濉叆i鐨勫鹼紝灝忔暟閮ㄥ垎榪斿洖
]]>
#include<conio.h>
#define X 3
#define Y 3 //3*3鐨勮窛闃?/p>
int b[X][Y];
int c[X][Y];
main()
{
int i,j,temp;
//clrsc();
printf("Please input int matrix b[%d][%d]\n",X,Y);
for(i=0;i<Y;i++)
for(j=0;j<Y;j++){
scanf("%d",&temp);
b[i][j]=temp;
}
printf("Please input int matrix c[%d][%d]\n",X,Y);
for(i=0;i<X;i++)
for(j=0;j<Y;j++){
scanf("%d",&temp);
c[i][j]=temp;
}
matrix(b,c);
printf("Now print resource matrix b[%d][%d]=",X,Y);
for(i=0;i<X;i++){
printf("\n");
for(j=0;j<Y;j++)
printf("%d ",b[i][j]);
}
printf("\n");
printf("Now print resource matrix c[%d][%d]=",X,Y);
for(i=0;i<X;i++){
printf("\n");
for(j=0;j<Y;j++)
printf("%d ",c[i][j]);
}
printf("\n");
printf("Now printm multiply results matrix a[%d][%d]=B*C:",X,Y);
for(i=0;i<X;i++){
printf("\n");
for(j=0;j<Y;j++)
printf("%d ",a[i][j]);
}
getch();
return 0;
}
/********************************************************************/
void matrix(int b[][X],int c[][Y])
{
int i,j,k,temp;
for(i=0;i<X;i++)
for(j=0;j<Y;j++){
for(k=0;k<Y;k++)
a[i][j]+=b[i][k]*c[k][j];
}
}
]]>
eye 鍗曚綅鐭╅樀
zeros 鍏ㄩ浂鐭╅樀
ones 鍏?鐭╅樀
rand 鍧囧寑鍒嗗竷闅忔満闃?
genmarkov 鐢熸垚闅忔満Markov鐭╅樀
linspace 綰挎х瓑鍒嗗悜閲?
logspace 瀵規暟絳夊垎鍚戦噺
logm 鐭╅樀瀵規暟榪愮畻
cumprod 鐭╅樀鍏冪礌绱涔?
cumsum 鐭╅樀鍏冪礌绱鍜?
toeplitz Toeplitz鐭╅樀
disp 鏄劇ず鐭╅樀鍜屾枃瀛楀唴瀹?
length 紜畾鍚戦噺鐨勯暱搴?
size 紜畾鐭╅樀鐨勭淮鏁?
diag 鍒涘緩瀵硅鐭╅樀鎴栨娊鍙栧瑙掑悜閲?
find 鎵懼嚭闈為浂鍏冪礌1鐨勪笅鏍?
matrix 鐭╅樀鍙樼淮
rot90 鐭╅樀閫嗘椂閽堟棆杞?0搴?
sub2ind 鍏ㄤ笅鏍囪漿鎹負鍗曚笅鏍?
tril 鎶藉彇涓嬩笁瑙掗樀
triu 鎶藉彇涓婁笁瑙掗樀
conj 鍏辮江鐭╅樀
companion 浼撮殢鐭╅樀
det 琛屽垪寮忕殑鍊?
norm 鐭╅樀鎴栧悜閲忚寖鏁?
nnz 鐭╅樀涓潪闆跺厓绱犵殑涓暟
null 娓呯┖鍚戦噺鎴栫煩闃典腑鐨勬煇涓厓绱?
orth 姝d氦鍩?
rank 鐭╅樀縐?
trace 鐭╅樀榪?
cond 鐭╅樀鏉′歡鏁?
inv 鐭╅樀鐨勯?
rcond 閫嗙煩闃墊潯浠舵暟
lu LU鍒嗚В鎴栭珮鏂秷鍏冩硶
pinv 浼?
qr QR鍒嗚В
givens Givens鍙樻崲
linsolve 姹傝В綰挎ф柟紼?
lyap Lyapunov鏂圭▼
hess Hessenberg鐭╅樀
poly 鐗瑰緛澶氶」寮?
schur Schur鍒嗚В
expm 鐭╅樀鎸囨暟
expm1 鐭╅樀鎸囨暟鐨凱ade閫艱繎
expm2 鐢ㄦ嘲鍕掔駭鏁版眰鐭╅樀鎸囨暟
expm3 閫氳繃鐗瑰緛鍊煎拰鐗瑰緛鍚戦噺姹傜煩闃墊寚鏁?
funm 璁$畻涓鑸煩闃靛嚱鏁?
logm 鐭╅樀瀵規暟
sqrtm 鐭╅樀騫蟲柟鏍?
2 鐗規у間笌濂囧紓鍊?
spec 鐭╅樀鐗瑰緛鍊?
gspec 鐭╅樀鏉熺壒寰佸?
bdiag 鍧楃煩闃碉紝騫夸箟鐗瑰緛鍚戦噺
eigenmar- 姝e垯鍖朚arkov鐗瑰緛
kov 鍚戦噺
pbig 鐗瑰緛絀洪棿鎶曞獎
svd 濂囧紓鍊煎垎瑙?
sva 濂囧紓鍊煎垎瑙h繎浼?
3 鐭╅樀鍏冪礌榪愮畻
cumprod 鍏冪礌绱縐?
cumsum 鍏冪礌绱鍜?
hist 緇熻棰戞暟鐩存柟鍥?
max 鏈澶у?
min 鏈灝忓?
mean 騫沖潎鍊?
median 涓?
prod 鍏冪礌縐?
sort 鐢卞ぇ鍒板皬鎺掑簭
std 鏍囧噯宸?
sum 鍏冪礌鍜?
trapz 姊艦鏁板肩Н鍒?
corr 姹傜浉鍏崇郴鏁版垨鏂瑰樊
4紼鐤忕煩闃佃繍綆?
sparse 紼鐤忕煩闃?
adj2sp 閭繪帴鐭╅樀杞崲涓虹█鐤忕煩闃?
full 紼鐤忕煩闃佃漿鎹負鍏ㄧ煩闃?
mtlb_sparse 灝唖cilab紼鐤忕煩闃佃漿鎹負matlab紼鐤忕煩闃墊牸寮?
sp2adj 灝嗙█鐤忕煩闃佃漿鎹負閭繪帴鐭╅樀
speye 紼鐤忕煩闃墊柟寮忓崟浣嶇煩闃?
sprand 紼鐤忕煩闃墊柟寮忛殢鏈虹煩闃?
spzeros 紼鐤忕煩闃墊柟寮忓叏闆墮樀
lufact 紼鐤忕煩闃礚U鍒嗚В
lusolve 紼鐤忕煩闃墊柟紼嬫眰瑙?
spchol 紼鐤忕煩闃礐holesky鍒嗚В
]]>
鍦ㄦ暟瀛︿笂鎴戜滑鐭ラ亾鏈夎繖鏍蜂竴涓嚱鏁幫紝縐垎鍚庝負Pi錛屼絾鏄偅鏄В鏋愮殑銆傚浜庢暟瀛楀寲鐢佃剳錛岄毦鍏嶆湁鎴柇璇樊鍜岃垗鍏ヨ宸紝閭d箞褰撳彇鐐瑰緢澶氭椂錛岃宸細寰堝皬銆備簬鏄垜浠氨鍙互鍒╃敤榪欎釜鍘熺悊錛屽ぇ閲忕殑紱繪暎鏍肩偣錛岃揪鍒板嚑鍗冪敋鑷充笂涓囷紝閭d箞寰楀埌鐨凱i鍊間簬宸茬煡鐨勮繘琛屾瘮杈冿紝灝辯煡閬揷pu澶ф鐨勫伐浣滄晥鐜囥傚綋鐒惰繖鏍峰茍涓嶆槸寰堢簿紜紝浣嗗嵈鑳界粰鎴戜滑涓涓矖鐣ョ殑浼拌銆?br>涓嬮潰鏄垜鑷繁鍐欑殑涓涓皬鐨勭▼搴忥紝瀵筆i榪涜璁$畻錛屽緱鍒癙i鐨勫煎拰璁$畻鏃墮棿銆?br>
#include <iostream>
#include <fstream>
#include <ctime>
using namespace std;
double f(double);
int main()

{
time_t Stime,Etime;// time class
int n=10000000;
long double h=1.0/(long double)n;
long double sum=0.0;
int i;
long double x;
time(&Stime); //time start
for (i=1; i<=n; i++)
{
x=h*(i-0.5);
sum += f(x);
}
long double pi=h*sum;
cout<<pi<<endl;;
time(&Etime); //tim end
cout<<Etime-Stime<<endl;
return 0;
}

double f(double a)

{
return (4.0/(1.0+a*a));
}
]]>
璁句竴闃跺父寰垎鏂圭▼錛?
u'=f(t,u) a<t<b
u(t(0))=u(0)
Runge-Kutta闈炵嚎鎬ч珮闃跺崟姝ユ硶錛宲闃禦-K娉曠殑鏁翠綋闃舵璇樊涓篛(h^p)
R-K鍥涢樁綆楁硶涓猴細
u(i+1)=u(i)+h*(k1+3*k2+3*k3+k4)/8
k1=f(t(i),u(i))
k2=f(t(i+h/3),u(i+h*k1/3))
k3=f(t(i+h/3),u(i+h*k2/3))
k4=f(t(i+h),u(i+h*k3)) */
#include <iostream>
#include <cmath>
using namespace std;
class RK

{
private:
double k1,k2,k3,k4;
double h,b,u,a;
public:
void seth(double l=0)
{h=l;} //璁炬闀?/span>
void setf(double xa=0,double xb=0,double y=0) //璁懼垵鍊煎拰鑼冨洿錛坸a,xb錛?/span>
{
b=xb;
a=xa;
u=y;
}
double f(double t,double u) //鍑芥暟鍊鹼紝淇敼瀹冧互閫傚簲鍚勮嚜闇瑕?/span>
{
//鍑芥暟璁懼畾
double f=u-2*t/u;
return f;
}
/**//*---------------------------*/
void dork() //R-K 涓誨嚱鏁?/span>
{
for(int count=0;count<(b-a)/h;count++)
{
k1=f(a+count*h,u);
k2=f(a+count*h+h/3,u+h*k1/3);
k3=f(a+count*h+2*h/3,u-h*k1/3+h*k2);
k4=f(a+count*h+h,u+h*k1-h*k2+h*k3);
u=u+h*(k1+3*k2+3*k3+k4)/8;
cout<<u<<endl;
}
}
}; 
void main()

{
RK my;
my.seth(0.1);
my.setf(0,1,1);
my.dork();
}


璇ョ▼搴忓鏁版嵁鐩存帴榪涜鏄劇ず錛屽瑕佺敾鍥撅紝鍙互鍔犲叆鍑犺錛岃緭鍑烘暟鎹紝鐒跺悗榪涜鐢誨浘銆?br>
#include <iostream>
#include <cmath>
using namespace std;
inline double comp(double x)

{
return exp(-10*x*x);
}
int main()

{
double X[10];
for(int i=0;i<10;i++)
X[i]=comp(-1+i*0.1);
return 0;
}