小编HoH*_*oHo的帖子

我一直在努力解决这个问题:给定两个向量,每个向量包含可能重复的元素,如何测试一个是否完全包含在另一个中？%in%没有说明重复.我想不出一个优雅的解决方案,不依赖于apply家庭的东西.

x      <- c(1, 2, 2, 2)
values <- c(1, 1, 1, 2, 2, 3, 4, 5, 6)

# returns TRUE, but x[x == 2] is greater than values[values == 2]
all(x %in% values)

# inelegant solution
"%contains%" <- 
    function(values, x){
                   n <- intersect(x, values)
                   all( sapply(n, function(i) sum(values == i) >= sum(x == i)) )
                       }

# which yields the following:
> values %contains% x
 [1] FALSE
> values <- c(values, 2)
> values %contains% …

我正在使用 Django 开发一个工具，供我的组织内部使用。它用于搜索和标记文档（使用 Haystack 和 Solr），并将用于不同的项目。我的团队目前有一个工作原型，我们希望“在野外”部署它。

我们的安全环境很严格。项目文档位于网络驱动器上的子文件夹中，并且根据用户的 Windows 凭据限制对这些文件夹的访问（我们还有一个使用相同凭据的 MS SQL 服务器）。一个用户只能访问自己参与的项目。由于我们是微软的专卖店，如果我们想在公司内网部署我们的应用程序，我们需要使用一个IIS服务器来处理这些权限。团队中没有人具备使用 IIS、Active Directory 所需的知识，而且我们的 IT 部门已经人满为患。简而言之，我们不是网络开发人员，我们无法立即接触到任何有经验的人。

我的 hacky 解决方案是完全放弃 IIS，让每个最终用户在本地运行一个轻量级服务器（即 CherryPy），同时每个用户都保留对公共项目特定数据库的访问权限（例如，位于网络驱动器上的 SQLite DB 或 MS 上的 DB SQL 服务器）。为了使用该工具，他们只需启动一个多合一的批处理脚本并将浏览器指向127.0.0.1:8000. 我知道这有多丑陋，但我觉得它利用了已经到位的安全措施（请注意，在给定的项目中永远不要期望超过 10 个同时用户）。这是一个糟糕的主意吗，如果是这样，什么是更好的解决方案？

假设我有一个邻接矩阵如下:

library(igraph)
df <- data.frame(id = 1:8, parent = c(NA, NA, 1, 1, 3, 4, NA, 7))
g <- graph_from_data_frame(na.omit(df))

对于每个顶点,如何在有向路径中显示第一个和最后一个顶点？例如,顶点'4'从6开始并以1结束.(或者,获取该路径中所有顶点的列表将起作用).