假设您有一个包含某些元素的列表$(document).ready(function() {
$.ajaxSetup({
headers: {
"X-CSRF-TOKEN": $('meta[name="_token"]').attr("content")
}
});
$("#form_pergunta").validate({
rules: {
form_question: {
required: true,
minlength: 10,
maxlength: 250
},
form_url: {
required: false,
minlength: 0,
maxlength: 250,
nowhitespace: true
}
},
messages: {
form_question: {
required: "Por favor, digite sua pergunta.",
minlength: "Esta não parece ser uma pergunta válida.",
maxlength: "A pergunta não pode ter mais que 250 caracteres."
},
form_url: {
maxlength: "O link não pode ter mais que 250 caracteres.",
nowhitespace: "Não deve haver espaços no endereço digitado."
}
}
});
$("button#ajaxSubmit").click(function(e) {
if ($("#form_pergunta").valid()) {
jQuery.ajax({
url: "{{ url('/question') }}",
method: "POST",
data: $("#form_pergunta").serialize(),
success: function(result) {
$("#form_pergunta")[0].reset();
$("#myModal_Pergunte").modal("toggle");
msgbox_Text = "Sua pergunta foi incluída com sucesso!";
$("#msgbox_alertmsg").append(msgbox_Text);
$("#myModal_MsgBox").modal("show");
},
error: function(data, textStatus, errorThrown) {
console.log(data);
}
});
}
});
});
。
foo我想通过附加到现有元素和添加其他元素来有效地增加列表。例如，尽可能简单地将“ b”添加到元素2：5中，最好使用foo <- list()
foo[1:3] <- "a"
foo
# [[1]]
# [1] "a"
# [[2]]
# [1] "a"
# [[3]]
# [1] "a"
。
所需的输出
foo[2:5]<-答案 0 :(得分：5)
这确实可行：
foo[2:5] <- lapply(foo[2:5], c, "b")
c是串联函数。