### 统计代写|R代写project|Alternate Methods of Numerical Differentiation

R是一个用于统计计算和图形的自由软件环境。

statistics-lab™ 为您的留学生涯保驾护航 在代写R方面已经树立了自己的口碑, 保证靠谱, 高质且原创的统计Statistics代写服务。我们的专家在代写R代写方面经验极为丰富，各种代写R相关的作业也就用不着说。

• Statistical Inference 统计推断
• Statistical Computing 统计计算
• (Generalized) Linear Models 广义线性模型
• Statistical Machine Learning 统计机器学习
• Longitudinal Data Analysis 纵向数据分析
• Foundations of Data Science 数据科学基础

## 统计代写|R代写project|Test of dss044

$#$

###### Test problems, dss004, dss044

$#$

###### Delete previous workspaces

$\operatorname{rm}($ list $=1 s(a l 1=$ TRUE) )
$#$

###### Access dss004, dss044 for numerical derivatives

$#$ Test problems, dss004, dss044
$#$ # Delete previous workspaces
rm(list=ls(all=TRUE))
$#$
$#$ Access dss004, dss044 for numerical derivatives
setwd(“f:/appA2”);
source (“dss004.R”);
source(“dss044. $\left.\mathrm{R}^{\prime \prime}\right) ;$
$#$ #
setwd (“f:/appA2”);
source (“dss004. $\mathrm{R}^{\prime \prime}$ );
source (“dss044.R”);
$#$

###### derivatives

$\mathrm{n}=11$;
$\mathrm{u}=\operatorname{rep}(0, \mathrm{n})$;
uxa $=\operatorname{rep}(0, \mathrm{n})$;
uxxa $=\operatorname{rep}(0, n)$;
$\operatorname{errx}=\operatorname{rep}(0, \mathrm{n})$;
errxx $=$ rep $(0, n)$;
$#$

###### Independent variable

$\mathrm{xl}=0 ; \mathrm{xu}=1 ; \mathrm{dx}=(\mathrm{xu}-\mathrm{xl}) /(\mathrm{n}-1)$;
$\mathrm{x}=\operatorname{seq}($ from $=\mathrm{xl}$, to $=\mathrm{xu}, \mathrm{by}=\mathrm{dx})$;
$#$

###### Select case

for (ncase in $1: 2){$
$#$
$# u x$
for (i in $1: n$ ) {
if $($ ncase $==1){u[i]=\exp (x[i]) ;}$
if $($ ncase $==2){u[i]=\sin (2 * p i \star x[i]) ;}$
}
$u x n=d s s 004(x l, x u, n, u)$;
if (ncase $==1){$
cat (sprintf(” $\backslash \mathrm{n} \backslash \mathrm{n}$ ncase $=\frac{\circ}{\circ} 1 \mathrm{~d}, \mathrm{n}=\stackrel{\circ}{\mathrm{o}} 2 \mathrm{~d}$, dss004″,
ncase, n)) ;
cat (sprintf(
” $\backslash \mathrm{n}$ i $\mathrm{x}$ uxn uxa
errx”));
for (i in $1: n){$
uxa [i] $=\exp (x[i])$;
$\operatorname{errx}[i]=a b s(u x n[i])-a b s$ (uxa [i]);
cat (sprinte (
$i, x[i], \operatorname{uxn}[i], u x a[i], \operatorname{errx}[i])) ;}$
}
if $($ ncase $==2){$
cat (sprintf(” $\backslash \mathrm{n} \backslash \mathrm{n}$ ncase $=\stackrel{\circ}{\circ} 1 \mathrm{~d}, \mathrm{n}=\stackrel{\circ}{\mathrm{z}} 2 \mathrm{~d}, \mathrm{dss004″,}$
ncase, n)) ;
cat (sprintf!
“\n i $x$ uxn uxa
errx”));
for (i in $1: n$ ) {
uxa $[i]=2 * p i \star \cos (2 * p i * x[i])$;
errx[i] =abs (uxn [i])-abs (uxa [i]);

## 统计代写|R代写project|The independent variable

• The independent variable $x$ is defined on an interval with $\mathrm{n}=11$ points, $x_{l}=0 \leq$ $x \leq x_{u}=1$ by the R seq utility.
$#$
###### Independent variable

$\mathrm{xl}=0 ; \mathrm{xu}=1 ; \mathrm{dx}=(\mathrm{xu}-\mathrm{xl}) /(\mathrm{n}-1)$;
$x=\operatorname{seq}($ from $=x l$, to=xu, by=dx) ;

• The programming steps through two cases corresponding to the two test functions, (1) $u(x)=e^{x},(2) u(x)=\sin (2 \pi x)$.
#
# Select case
for (ncase in $1: 2){$
• The two test functions are placed in array u.
$#$
###### ux

for (i in $1: n$ ) {
if $($ ncase $==1){u[i]=\exp (x[i]) ;}$
if (ncase $==2){u[i]=\sin (2 * p i * x[i]) ;}$
}

• The first numerical derivative, uxn, is computed for the first function (ncase $=1$ ), and the error in this numerical derivative is computed as the difference of the numerical and exact derivatives, errx [i] =abs (uxn [i])-abs (uxa [i]).
$u x n=d s s 004(x l, x u, n, u)$;
if (ncase $==1$ ) {
cat (sprintf (
” $\backslash \mathrm{n}$ i $\mathrm{x}$ uxn uxa
(errx”));
for (i in $1: n){$
uxa [i] $=\exp (x[i])$;
$\operatorname{errx}[i]=a b s(u x n[i])-a b s$ (uxa [i]);
cat (sprintf(
” $\backslash \mathrm{n}$ ๕ั $4 \mathrm{~d}$ ซั.3f문 $10.5 \mathrm{f} \div 10.5 \mathrm{f} \mathrm{~}$
$i, x[i], u \times n[i]$, uxa [i], errx[i])) i}
}
The output displays $x$, the numerical and exact first derivatives, uxn, uxa, and the error in the numerical derivative, errx,

## 统计代写|R代写project|dss044 Listing

A listing of function dss04 4 follows.
dss044 function $(x l, x u, n, u, u x, n 1, n u)}$
$#$

#

###### Preallocate arrays

$u x \times=r e p(0, n)$;
$#$

###### Grid spacing

$\mathrm{dx}=(\mathrm{xu}-\mathrm{xl}) /(\mathrm{n}-1)$;
$#$
$# 1 /(12 * \mathrm{dx} * \star 2)$ for subsequent use
$r 12 d x s=1 /\left(12 * d x^{\wedge} 2\right)$;
$#$

###### uxx vector

$#$

###### Boundaries $(\mathrm{x}=\mathrm{x} l, \mathrm{x}=\mathrm{xu})$

if $(\mathrm{nl}==1)$
uxx $[1]=r 12 d x s *$
$\left(\begin{array}{ll}45 * u[1 & 1\end{array}\right]-154 * u[\quad 2]+214 * u\left[\begin{array}{ll}3 & 3\end{array}\right]-$
$\left.156 * u[4]+61 * u\left[\begin{array}{ll}5 & 5\end{array}\right]-10 * u[6]\right)$;
if $(n u==1)$
uxx $[n]=r 12 d x s *$
$(45 * u[n]-154 * u[n-1]+214 * u[n-2]-$
$156 * u[n-3]+61 * u[n-4]-10 * u[n-5]) ;$
if $(n l==2)$
uxx [1] $=r 12 \mathrm{dxs} *$
$\left(\begin{array}{ll}-415 / 6 * u[1 & 1\end{array}\right]+96 * u[2]-36 * u[1]$
$32 / 3 * u[\quad 4]-3 / 2 * u[\quad 5]-50 * u x[1] * d x)$;
if $(n u==2)$
uXx $[n]=r 12 d x s *$

## 统计代写|R代写project|Test of dss044

##

##

###### 删除以前的工作区

R M⁡(列表=1s(一种l1=真的） ）
##

###### 访问 dss004、dss044 获取数值导数

##测试问题，dss004，dss044
### 删除之前的工作区
rm(list=ls(all=TRUE))
##
##访问 dss004、dss044 获取数值导数
setwd(“f:/appA2”);

###
setwd (“f:/appA2”);

##

n=11;

##

###### 自变量

Xl=0;X在=1;dX=(X在−Xl)/(n−1);
X=序列⁡(从=Xl， 到=X在,b是=dX);
##

###### 选择案例

for (ncase in $1: 2){## 用户体验F这r(一世一世n1：n)一世F$($nC一种s和$==1)在[一世]=经验⁡(X[一世]);$一世F$($nC一种s和$==2)在[一世]=罪⁡(2∗p一世⋆X[一世]);$uxn=dss 004(xl, xu, n, u);一世F(nC一种s和==1){C一种吨(spr一世n吨F(”\反斜杠 \mathrm{n} \反斜杠 \mathrm{n}nC一种s和= \ frac {\ circ {\ circ} 1 \ mathrm {~ d}, \ mathrm {n} = \ stackrel {\ circ {\ mathrm {o}} 2 \ mathrm {~ d,dss004″,nC一种s和,n));C一种吨(spr一世n吨F(”\反斜杠 \mathrm{n}一世\数学{x}在Xn在X一种和rrX”));F这r(一世一世n1：n){在X一种[一世]=\exp (x[i]);\operatorname{errx}[i]=abs(uxn[i])-abs(在X一种[一世]);C一种吨(spr一世n吨和(i, x[i], \operatorname{uxn}[i], uxa[i], \operatorname{errx}[i])) ;}} 如果} 如果(nC一种s和==2){C一种吨(spr一世n吨F(”\反斜杠 \mathrm{n} \反斜杠 \mathrm{n}nC一种s和=\stackrel{\circ{\circ}1\mathrm~d},\mathrm{n}=\stackrel\circ}{\mathrm{z}}2\mathrm{~d},\mathrm{dss004″,nC一种s和,n));C一种吨(spr一世n吨F!“\n一世X在Xn在X一种和rrX”));F这r(一世一世n1: n$) {
uxa[一世]=2∗p一世⋆因⁡(2∗p一世∗X[一世]);
errx[i] =abs (uxn [i])-abs (uxa [i]);

## 统计代写|R代写project|The independent variable

• 自变量X被定义在一个区间上n=11点，Xl=0≤ X≤X在=1通过 R seq 实用程序。
##
###### 自变量

Xl=0;X在=1;dX=(X在−Xl)/(n−1);
X=序列⁡(从=Xl, to=xu, by=dx) ;

• 编程步骤通过对应于两个测试功能的两种情况，（1）在(X)=和X,(2)在(X)=罪⁡(2圆周率X).
#
# 选择 case
for (ncase in $1: 2){$
• 两个测试函数放在数组 u 中。
##
###### 用户体验

}

• 为第一个函数 (ncase) 计算一阶数值导数 uxn=1)，并且这个数值导数的误差被计算为数值导数和精确导数的差，errx [i] =abs (uxn [i])-abs (uxa [i])。
在Xn=dss004(Xl,X在,n,在);
如果 (ncase==1) {
猫 (sprintf (
”∖n一世Xuxn uxa
(errx”));
对于（我在1: n){$uxa [i]$=\exp (x[i])$;$\operatorname{errx}[i]=a b s(u x n[i])-a b s$(uxa [i]); cat (sprintf( ”$\反斜杠 \mathrm{n}$๕ั$4 \mathrm{~d}$ซั.3f문$10.5 \mathrm{f} \div 10.5 \mathrm{f} \mathrm{~}i , x[i], u \times n[i]$, uxa [i], errx[i])) i} } 输出显示1: n){$ uxa [i] $=\exp (x[i])$; $\operatorname{errx}[i]=a b s(u x n[i])-a b s$ (uxa [i]); cat (sprintf( ” $\反斜杠 \mathrm{n}$ ๕ั $4 \mathrm{~d}$ ซั.3f문 $10.5 \mathrm{f} \div 10.5 \mathrm{f} \mathrm{~}$ $i , x[i], u \times n[i]$, uxa [i], errx[i])) i} } 输出显示x\$，数值和精确的一阶导数，uxn，uxa，以及数值导数中的误差，errx，

## 统计代写|R代写project|dss044 Listing

dss04 4 函数列表如下。
dss044 功能(x l, x u, n, u, u x, n 1, n u)}(x l, x u, n, u, u x, n 1, n u)}
##

#

##

###### 网格间距

dX=(X在−Xl)/(n−1);
##
# 1 /(12 * \mathrm{dx} * \star 2)# 1 /(12 * \mathrm{dx} * \star 2)供后续使用
r12dXs=1/(12∗dX∧2);
##

##

###### 边界(X=Xl,X=X在)

uxx[1]=r12dXs∗
(45∗在[11]−154∗在[2]+214∗在[33]−
156∗在[4]+61∗在[55]−10∗在[6]);

uxx[n]=r12dXs∗
(45∗在[n]−154∗在[n−1]+214∗在[n−2]−
156∗在[n−3]+61∗在[n−4]−10∗在[n−5]);

uxx [1]=r12dXs∗
(−415/6∗在[11]+96∗在[2]−36∗在[1]
32/3∗在[4]−3/2∗在[5]−50∗在X[1]∗dX);

uXx[n]=r12dXs∗

## 有限元方法代写

tatistics-lab作为专业的留学生服务机构，多年来已为美国、英国、加拿大、澳洲等留学热门地的学生提供专业的学术服务，包括但不限于Essay代写，Assignment代写，Dissertation代写，Report代写，小组作业代写，Proposal代写，Paper代写，Presentation代写，计算机作业代写，论文修改和润色，网课代做，exam代考等等。写作范围涵盖高中，本科，研究生等海外留学全阶段，辐射金融，经济学，会计学，审计学，管理学等全球99%专业科目。写作团队既有专业英语母语作者，也有海外名校硕博留学生，每位写作老师都拥有过硬的语言能力，专业的学科背景和学术写作经验。我们承诺100%原创，100%专业，100%准时，100%满意。

## MATLAB代写

MATLAB 是一种用于技术计算的高性能语言。它将计算、可视化和编程集成在一个易于使用的环境中，其中问题和解决方案以熟悉的数学符号表示。典型用途包括：数学和计算算法开发建模、仿真和原型制作数据分析、探索和可视化科学和工程图形应用程序开发，包括图形用户界面构建MATLAB 是一个交互式系统，其基本数据元素是一个不需要维度的数组。这使您可以解决许多技术计算问题，尤其是那些具有矩阵和向量公式的问题，而只需用 C 或 Fortran 等标量非交互式语言编写程序所需的时间的一小部分。MATLAB 名称代表矩阵实验室。MATLAB 最初的编写目的是提供对由 LINPACK 和 EISPACK 项目开发的矩阵软件的轻松访问，这两个项目共同代表了矩阵计算软件的最新技术。MATLAB 经过多年的发展，得到了许多用户的投入。在大学环境中，它是数学、工程和科学入门和高级课程的标准教学工具。在工业领域，MATLAB 是高效研究、开发和分析的首选工具。MATLAB 具有一系列称为工具箱的特定于应用程序的解决方案。对于大多数 MATLAB 用户来说非常重要，工具箱允许您学习应用专业技术。工具箱是 MATLAB 函数（M 文件）的综合集合，可扩展 MATLAB 环境以解决特定类别的问题。可用工具箱的领域包括信号处理、控制系统、神经网络、模糊逻辑、小波、仿真等。