- 博客(6)
- 资源 (1)
- 收藏
- 关注
原创 牛顿法及牛顿下山法求零点
function [x_star,k]=MyNewton(fun,difffun,a,ep)k=1x_k=af_xk=feval(fun,x_k)fdiff_xk=feval(difffun,x_k)x_k1=x_k-f_xk/fdiff_xk while abs(x_k-x_k1)>ep k=k+1 x_k=x_k1 f_x
2014-11-21 18:43:36 2737
原创 双割线求值
function [ x_star,k] = GeXian( fun,x_0,x_1,ep )%UNTITLED5 Summary of this function goes here% Detailed explanation goes here%GeXian求在区间【x_0,x_1】之间的零点%fun 求值函数%x_0起点%x_1终点k=1x_k=x_0x_k1=x_
2014-11-21 18:36:39 437
原创 迭代法求方程的根 (ψ(x)-x=0的根)
function [x_star,k]=my_iterate(fun,a,ep)%用非线性求解迭代法通过 x=ψ(x),求解ψ(x)-x=0的根%N最大迭代次数% a是不动点的近似%ep容许误差N=500my_fun=fun;k=1;x_0=ax_1=feval(my_fun,a) while abs(x_1-x_0) && N >= 0 k=k
2014-11-20 20:14:32 1039
原创 二分法求根函数
function [x_star,k]=bisect(fun,a,b,ep)%bisect 二分法求根% fun(x)求根的函数%a为求根起始点%b为求根区间的终点%ep为容许误差if nargin disp('请输入正确参数\n'); return;enderr=1;fa=feval(fun,a)fb=feva
2014-11-20 17:04:58 1178
原创 图像多层小波变换
clear;clc;clf;%读图像Data=imread('C:\Users\pc\Desktop\压缩感知PPT\lena.png');%画原图subplot(1,3,1)imshow(Data)title('原彩图')Data=rgb2gray(Data); subplot(1,3,2)imshow(Da
2014-11-15 15:36:15 2451
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人