我正在用 Python 编写一个程序来查找数组中最短和最长的字符串，例如这是 find_shortest
def find_shortest(words):
N = len(words)
shortest = words[0]
i = 1
while i < N:
if len(shortest) >= len(words[i]): #Change only this line for find_longest
shortest = words[i]
i += 1
return shortest
我的问题是 find_longest 函数与 find_shortest 函数完全相同，只是 find_longest 使用 <= 符号而不是 >=。我不想复制粘贴 find_shortest 函数来制作 find_longest，但我没有其他选择。在这种情况下，如何避免复制粘贴和冗余？
我有一个功能
fun foo(
id: String,
vararg values: Int,
){
...
}
还有这样的呼吁
fun bar1(){
foo("id_1")
foo("id_2", 1)
foo("id_3", 1, 2, 3)
}
现在我明白了我需要向 foo 添加一个参数。但我不想破坏现有的调用，所以我尝试使用默认值添加它：
fun foo(
id: String,
attributes: Array<String> = arrayOf("a", "b"),
vararg values: Int,
){
...
}
但
foo("id_2", 1)
foo("id_3", 1, 2, 3)
变得破碎。
有没有办法在不破坏现有调用的情况下添加一个具有默认值的参数？
如果此列的第一个单元格为空白，我会尝试编写一个脚本来删除该列。第 1 行有时有内容，有时为空白。我想要一个宏，当第 1 行的单元格为空白时，该宏将删除整个列并检查下一列，直到第 1 行的单元格不再为空白（例如，如果 A1 为空白，则删除 A 列并转到下一列，直到所有列都已测试）。
我无法弄清楚我在哪里犯了代码错误。
我尝试了一个已有的脚本，用于逐行删除，直到没有带有特定空白单元格的行（我尝试自己修改它，以便也将其用于列）。该脚本可以工作，但什么也没做，我没有任何错误。他在这里：
function delmonth() {
var spreadsheet = SpreadsheetApp.getActiveSpreadsheet();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('CALMON'), true);
var sheet = SpreadsheetApp.getActiveSheet();
var e = sheet.getRange('A' + sheet.getMaxColumns())
.getNextDataCell(SpreadsheetApp.Direction.NEXT)
.getColumn() ;
for (k = 1; k <= e; k++) {
if(sheet.getRange('A' + k).getValue() == '') {
sheet.deleteColumn(k);
k=1;
e--;
if(k==e) {
break
};
SpreadsheetApp.flush();
}
}
}
我很确定我在某个地方犯了一个愚蠢的错误（因为我对编码还不熟悉）。
感谢大家的时间和帮助！
我对 haskell 非常陌生，我接到一个任务，要创建一个属性列表，然后创建一个函数，输出适用于输入的属性列表，但由于某种原因，它只给我一个错误。下面是代码片段和错误
properties :: [Predicate Thing]
properties = [isBlue, isThick, isThin, isOrange, isDisc, isSquare, isBig, isSmall]
propertiesOf :: Thing -> [Predicate Thing]
propertiesOf x = [props | props <- properties, props x == True]
错误如下：
<interactive>:8:1: error: [GHC-39999] * No instance for Show (Thing -> Bool)'arising from a use of print' (maybe you haven't applied a function to enough arguments?) * In a stmt of an interactive GHCi command: print it
我希望输入一个橙色的、圆盘状的、大而厚的“东西”，并接收输出：
>[isBig, isDisc, isOrange, isThick]
我不确定为什么上面列出的功能不起作用。
目前，我正在尝试开发图灵机。它应该接受一个序列 k、x1、x2、...、xn，其中 k 是正整数，对于每个 i，xi 是非负整数作为输入。所有数字都将以 的形式编码a^k b a^x1 b a^x2 b ..... b a^xn。
对于输出，它应该输出第k个元素的值。
例如：如果我的输入是 aaababaaaaabaa(k = 3, 第一个元素 = 1, 第二个元素 = 5, 第三个元素 = 2)
在这种情况下，图灵机应将输出显示为 aa(2)。我目前面临的问题是，我不知道如何跟踪数字 k，因为没有计数器/内存来存储值 k。此外，即使我跟踪了第 k 个元素，我也不知道如何输出该值
我曾尝试使用标记符号技术，即每次从 k 中读取 a 时，它都会将其写为 A 并向右查找 b。如果找到 b，则将其写为 B 并返回查找 A。在这种情况下，我可以跟踪每个 A 和 B（我的想法就像用每个 b 取消每个 a）。但最后，当没有更多的 A 和 B 时，我不知道如何转到第 k 个元素并输出值。
希望有人能帮助我。
p/s: 我正在使用 Tuatara 模拟器
谢谢。
我有这个查询，我想添加一个条件来过滤给定时间范围的报告结果（我的工作表中的时间范围是N2和N3）
我现在拥有的是以下内容，并且它非常有效：
=QUERY('Report'!$A$2:$I; "Select B Where A = '"&$B28&"'");"Nothing to show")
不，我想添加一个条件，以仅过滤出N2（开始日期）和N3（结束日期）中给定时间段的结果。报告中的日期在 D 列。我做了以下操作，但没有效果：
=QUERY('Report'!$A$2:$I; "Select B Where A = '"&$B12&"';Select D where D >= date '"&$N$2&"' and D <= date '"&$N$3&"'");"Nothing to show")
我做错什么了？
最近我自学MIT 6.5151课程，先读了CS 61AS Unit 0作为准备，然后根据ps0的要求读了SICP 1到2.1（还有相关的讲义）（也根据CS 61A的讲义要求读了2.2.1），然后读了Software Design for Flexibility (SDF) Prologue，第一章和Scheme的部分附录。
我使用 MIT-Scheme。
目前我正在阅读 SDF 第 2 章并做练习 2.5 (b)。
以下代码会产生奇怪的结果，抛出错误“；对象 square 不适用。”和“；对象 (lambda (x) (square x)) 不适用。”。这里func_polynomial_minimal_unit计算类似于(f(f(g(x)))调用时的内容(func_polynomial_minimal_unit '((f . 2) (g . 1)))
(define (compose f g)
(define (the-composition . args)
(call-with-values (lambda () (apply g args))
f))
the-composition)
(define (iterate n)
(define (the-iterator f)
(if (= n 0)
identity
(compose f ((iterate (- n 1)) f))))
the-iterator)
(define (identity x) x)
(define (func_polynomial_minimal_unit . func_pow_pair_lst)
(if (null? (car func_pow_pair_lst)) ; contain one null pair
identity
(let ((cur_func_pow (caar func_pow_pair_lst)))
(newline)
(display cur_func_pow)
(compose
((iterate (cdr cur_func_pow)) (car cur_func_pow))
(func_polynomial_minimal_unit (cdr func_pow_pair_lst))))))
;; equivalent lambda for the following `func_polynomial_minimal_unit`.
((lambda (x) (expt (* x 9) (expt 2 3))) 3)
;; these works
((compose ((iterate 3) (lambda (x) (square x))) (lambda (x) (* 3 x))) 3)
((compose ((iterate 3) square) (lambda (x) (* 3 x))) 3)
;; these doesn't work
((func_polynomial_minimal_unit '((square . 3) ((lambda (x) (* 3 x)) . 2))) 3)
((func_polynomial_minimal_unit '(((lambda (x) (square x)) . 3) ((lambda (x) (* 3 x)) . 2))) 3)
但如上面的代码所示，这些程序是可以适用的。那么为什么会抛出这些错误呢？
我有一张包含多列的表格，其中一些列使用数字命名（例如 1、2、3、...）。当我尝试使用带有这些列名的 CATX 函数（例如 CATX("+", _1, _2, _3, ..., _26)）时，我遇到一个问题，它报告这些列不存在。这种行为以前在常规 SAS 中有效，但现在我使用 SAS Grid 时，它不再按预期运行。我收到一条错误消息，提示这些列不存在。
我有以下内容：
syms As(s) F0 alpha beta m1 m3
As(s) = ((F0*(alpha-beta)/(2*(s^2+(alpha-beta)^2)))-(F0*(alpha+beta)/(2*(s^2+(alpha+beta)^2))))/(m1+m3);
m1 = 1; % [kg]
m3 = 1; % [kg]
famp = 0.5; % [N]
scale = 0.01;
F0 = famp*scale; % [N]
alpha = 0.2;
beta = 0.15;
subs(As,{m1,m3,F0,alpha,beta},{m1,m3,F0,alpha,beta});
将标量值代入 后As(s)，As(s)仍为：
为什么 MATLAB 不将我指定的值替换为As(s)？
我有以下函数，它返回作为时间函数的非线性信号：
function y = NARMA_optimized(u,mu,delta,phi,psi,m,N,k)
y = zeros(N,1);
% y(0)=0, and also y(-1)=0 etc.
t = 1;
y(t) = mu.* u(t-m-k).* u(t-k) + delta;
for t = 2:N
v = 1;
for i = 1:m
if t-i > 0 % else we add 0
v = v + y(t-i);
end
end
v = phi.*y(t-1) + v.*psi.*y(t-1) + mu.*u(t-m-k).*u(t-k) + delta;
y(t) = v;
end
end
要调用该函数，我执行以下操作：
% NARMA Model Comparison
alpha = 0.2;
beta = 0.15;
f_0_i = 1;
delta = 0.1;
Mu = 1.5;
m = 10;
phi = 0.3;
psi = 0.05;
k_shift = 0;
Sigma = 1;
M = 100; % Upper simulation time limit [seconds]
f = @(t) Sigma.*f_0_i.*sin(alpha.*t).*cos(beta.*t);
dt = 10^-2; % timescale step size [seconds]
t_span = [0:dt:M];
T = NARMA_optimized(f,Mu,delta,phi,psi,m,length(t_span),k_shift);
figure;
plot(T);
我想更改当前函数的时间刻度以匹配我表示为的时间的离散表示t_span。
我知道这需要对函数进行两个关键更改：
t=0, 不t=1.y相当于 的步长dt，而不是1秒。我不确定当前的 for 循环结构是否可以修改以适应这些必要的更改，或者我是否需要从头开始。我知道 MATLAB 从索引 1 开始，而不是索引 0。循环中从索引 0 开始的解决方法如下：dt = 10^-2; % [seconds]
M = 100; % [seconds]
t_span = [0:dt:M];
for t=1:numel(t_span)
y(t) = [insert value here]
end
我不确定这是否是他们dt在新函数中从索引 0 开始计算的最佳方式。