我想问一下是否可以将一个环境的所有对象复制/移动到另一个环境.例如:
f1 <- function() {
print(v1)
print(v2)
}
f2 <- function() {
v1 <- 1
v2 <- 2
# environment(f1)$v1 <- v1 # It works
# environment(f1)$v2 <- v2 # It works
environment(f1) <- environment(f2) # It does not work
}
f2()
f1()
TNX,提前
我可以问你如何获得路径的最后一个子目录.例如,我想获取子目录"7",以下代码失败:
Path <- "123\\456\\7"
Split <- strsplit(Path, "\\") # Fails because of 'Trailing backslash'
LastElement <- c[[1]][length(Split[[1]])]
先感谢您
我想用ggtk2组合gWidgets(john verzani).这可以被任何人用作范例.
算法如下:步骤1:构造一个gwindow(或gframe)步骤2:构造GTK可滚动文本视图步骤3:将最后一个转换为gwidget步骤4:将其添加到gwindow(或gframe)中
我想知道这是否是一个正确的思考,而我面临的问题是GTK可滚动文本视图:我无法使滚动条工作.
R中的代码如下:
###########################
# load libraries
library(RGtk2)
library(gWidgets)
library(gWidgetsRGtk2)
# data set
x <- c(1:9)
y <- c(10:19)
z <- c(20:29)
df <- data.frame(x, y, z)
df.co <- capture.output(df)
###########################
# STEP 1, library(gWidgets)
# Construct a gwindow (or a gframe)
G.Window <- gwindow()
###########################
# STEP 2, library(RGtk2)
# Construct a GTK scrollable text view
Gtk.Text.View <- gtkTextViewNew(show = TRUE)
# create a table to attach the scrollbars
Gtk.Table.New <- gtkTableNew(2, 2, show = TRUE)
# …我想问一下是否有人能够发现第2次施工中的错误是因为没有收到与第1次施工相同的清单.有没有一种方法来指代名称列表的元素？例如,某些函数(myList [[1]])== a1？
# construction #1
myList <- list(a1 = list(a2 = list("a21", "a22")), b1 = list("b1", "b2"))
# construction #2
myList <- list()
myList[[1]] <- list(a1=list())
myList[[1]][[1]] <- list(a2=list())
myList[[1]][[1]][[1]] <- "a21"
myList[[1]][[1]][[2]] <- "a22"
myList[[2]] <- list(b1=list())
myList[[2]][[1]] <- "b1"
myList[[2]][[2]] <- "b2"
非常感谢你提前
我想问一下是否有办法看到隐藏在文本中的变量.
如果我跑
k <- eval(expression(v <- 1))
然后我得到v等于1.
但是,如果我有,它是如何工作的
k <- "v <- 1"
先感谢您
我想问一下是否可以在列表中添加元素.例如列表
L <- vector("list", 2)
L[[1]] <- vector("list", 2)
我想成为
[[1]]
[[1]][[1]]
NULL
[[1]] # add an element and it becomes [[1]]
[[1]][[2]] [[1]][[2]][[3]]
NULL NULL
[[2]]
NULL
谢谢大家