在日期

Question

我复制了我的例子如下：

x<-as.Date(c(as.Date('2015-01-01'):as.Date('2016-01-01')), origin='1970-01-01')
dates<-as.Date(c(as.Date('2015-01-01'),as.Date('2015-03-04'),as.Date('2015-07-01')),origin='1970-01-01')
values<-c(3,7,10)

我想要的是一个输出数据框，values中特定日期的x加入到最近但历史悠久的日期条目中。例如：

x, value
2015-01-01, 3
2015-01-02, 3
....
2015-03-04, 7
2015-03-05, 7
....
2015-07-01, 10
2015-07-02, 10
....
2016-01-01, 10

我目前通过for循环实现了这一点，但感觉速度慢而且效率极低 - 我确定在R中必须有一些方法可以更自动地执行此操作吗？

Answer 1

尝试类似的东西

 Toolbar toolbar = (Toolbar)view.findViewById(R.id.toolbar);
        AppCompatActivity activity = ((AppCompatActivity) getActivity());
        activity.setSupportActionBar(toolbar);