小编Eug*_*kov的帖子

我试图绘制傅里叶积分,但我在积分时得到错误

X <- seq(-10, 10, by = 0.05)
f_fourier <- function(X) {
    Y <- sapply(X, function(x) {
        integrand <- function(l) {
            y <- (2 / pi) * cos(l * x) / (l^2 + 1)
        }
        integrate(integrand, lower = 0, upper = Inf)$value
    })
}
plot(X,f_fourier(X))

错误:

maximum number of subdivisions reached

我发现"cos(l*x)"会导致这个错误,但Wolfram给了我正常的结果.你能提出什么建议吗？

我有一个带纹理的道路的3D模型,没有.

当我加载没有纹理的道路时,一切正常~60fps.但是当我用纹理加载道路时,有两种变体:

1)如果3D模型不大,那么它加载并工作但fps非常低~10-20

2)如果3D模型很大,它加载时没有任何错误和警告,但之后我收到此错误:

WebGL: CONTEXT_LOST_WEBGL: loseContext: context lost
THREE.WebGLShader: gl.getShaderInfoLog() null 

这个错误在这里:

animate = function() {
    renderer.render(scene, camera); <--- error occurs here
    stats.update();
    controls.update(clock.getDelta());
    return requestAnimationFrame(animate);
};

我已经读过这个错误意味着:"浏览器或操作系统决定重置GPU以获得控制权",但我该如何解决这个问题呢？

我研究了Jerry Tessendorf撰写的"模拟海水"文章,并尝试编制统计波模型,但我没有得到正确的结果,我不明白为什么.

在我的程序中,我只尝试在时间上创建波高域,t = 0而不进行任何进一步的更改.执行我的程序后,我没有得到我所期望的:

这是我的源代码:

clear all; close all; clc;
rng(11); % setting seed for random numbers

meshSize = 64; % field size
windDir = [1, 0]; % ||windDir|| = 1
patchSize = 64;
A = 1e+4;
g = 9.81; % gravitational constant
windSpeed = 1e+2;

x1 = linspace(-10, 10, meshSize+1); x = x1(1:meshSize);
y1 = linspace(-10, 10, meshSize+1); y = y1(1:meshSize);
[X,Y] = meshgrid(x, y);

H0 = zeros(size(X)); % height field at time t …

我正在使用Julia 0.3.4

我正在尝试使用高斯消元法编写LU分解.所以我必须交换行.这是我的问题:

如果我正在使用a,b = b,a我收到错误,

但如果我正在使用:

function swapRows(row1, row2)
    temp = row1
    row1 = row2
    row2 = temp
end

一切都很好.

我做错了什么或者是个错误？

这是我的源代码:

function lu_t(A::Matrix)
  # input value: (A), where A is a matrix
  # return value: (L,U), where L,U are matrices

  function swapRows(row1, row2)
    temp = row1
    row1 = row2
    row2 = temp
    return null
  end

  if size(A)[1] != size(A)[2]
    throw(DimException())
  end

  n = size(A)[1] # matrix dimension
  U = copy(A) # upper triangular matrix
  L = …