我有以下情节:
m <- structure(list(Var1 = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 7L,
1L, 2L, 3L, 4L, 5L, 6L, 7L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 1L, 2L,
3L, 4L, 5L, 6L, 7L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 1L, 2L, 3L, 4L,
5L, 6L, 7L, 1L, 2L, 3L, 4L, 5L, 6L, 7L), .Label = c("FE", "AG",
"NO", "SPH", "SEP", "H/I", "CMP"), class = "factor"), Var2 = structure(c(1L,
1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, …Run Code Online (Sandbox Code Playgroud) 我在尝试在R中实现双列表时遇到问题.如果一个子列表仅使用一个元素进行初始化,那么在我尝试添加更多元素之后,我会收到错误消息:
提供的元素多于要替换的元素
这是一个例子:
#
# This is OK
#
a <- list()
a[["elem1"]][["elem2"]] <- c(10,20)
a[["elem1"]][["elem2"]] <- c(a[["elem1"]][["elem2"]], c(30,40))
Run Code Online (Sandbox Code Playgroud)
这是一个输出:
> a
$elem1
$elem1$elem2
[1] 10 20 30 40
Run Code Online (Sandbox Code Playgroud)
但,
#
# This is giving error:
#
a <- list()
a[["elem1"]][["elem2"]] <- c(10)
a[["elem1"]][["elem2"]] <- c(a[["elem1"]][["elem2"]], c(30,40))
Error in a[["elem1"]][["elem2"]] <- c(a[["elem1"]][["elem2"]], c(30, 40)) :
more elements supplied than there are to replace
Run Code Online (Sandbox Code Playgroud)
这是一个输出:
> a
$elem1
elem2
10
Run Code Online (Sandbox Code Playgroud)
我将不胜感激任何帮助.
http://localhost:8000/admin/myapp/rnaextracts/?biosamples__biosamplesetid__in=[57,52,51,50,49]我已经构建了链接另一个管理页面的网址。该链接指向一个列表视图,并且该列表通过 url 中传递的表达式进行过滤。
然而,Django 重定向到正确的管理列表视图,但查询更改为?e=1(我认为这表明某种错误)并且显示未过滤的列表。
我已经在 Django shell 中尝试过过滤表达式,它有效:qs = RnaExtracts.objects.filter(biosamples__biosamplesetid__in=[57,52,51,50,49]。它返回一个查询集,其中包含 416 个对象中的 52 个。