Joint by date range and ID ,panel data

Question

I have the basic fund data,I want to add the manager name by the date range and the fund ID

I tried the fuzzy right join x = fuzzy_right_join(manager, fundret, by = c("fundName" = "fundName", "date"= "managerStartdate", "date" = "managerENDdate"), match_fun = list('==', '>', '<')) but have a error

Error in mf(rep(u_x, n_y), rep(u_y, each = n_x), ...) :could not find function "mf

and I tried some If /else functions to do,still doesnt't work......

library(lubridate)
manager=data.frame(managerName=c("A","B","C","D","E","F","G","H","I","J","K","L","M","N"),
                   fundName=c("fundA","fundA","fundA","fundA","fundA","fundA","fundA","fundA","fundA","fundA","fundA","fundB","fundB","fundC"),
                   managerStartdate=ymd(c("20040227","20041218","20140317","20140317","20120405","20151119","20140620","20150901","20100118","20150107","20051029","20140321","20130320","20140321")),
                   mangerENDdate=ymd(c("20051029","20050412","20151119","20170113","20130628","20170224","20150107","20170328","20140620","NA","20100118","20180912","20140430","20180912")))

fundret=data.frame(
                   fundName=c("fundA","fundA","fundA","fundA","fundA","fundA","fundB","fundC"),
                   date=ymd(c("20020628","20041003","20120508","20140321","20160101","20170201","20140707","20170909")),
                   ret=c(0.05,0.3,0.44444,0.00023,-0.0058,0.00006,-0.5,0.7))

And this is I wanted to joint

wantedresult=data.frame(
  fundName=c("fundA","fundA","fundA","fundA","fundA","fundA","fundB","fundC"),
  date=ymd(c("20020628","20041003","20120508","20140321","20160101","20170201","20140707","20170909")),
  ret=c(0.05,0.3,0.44444,0.00023,-0.0058,0.00006,-0.5,0.7),
  managerName=c("NA","A","I&E","C&D","D&J","J","L","N"))

Thanks for your help

manager:https://i.stack.imgur.com/sbfk7.jpg

fundret:https://i.stack.imgur.com/aQyj1.jpg

wantedresult:https://i.stack.imgur.com/DbWap.jpg

Your data is hard to read, and the point of your question is not getting across. What are you trying to join here? — Tim Biegeleisen, Jan 18 '19 at 05:47
@TimBiegeleisen Thanks for your advise，I will add my data pictures on post — Chon Kit Hui, Jan 18 '19 at 06:06

Arthur Yip · Accepted Answer · 2019-03-18T20:45:50.227

0

If you use backticks instead of quotes in the match_fun arguments, it should work.

match_fun = list(backtick==backtick, backtick>backtick, backtick

backtick = `

edited Mar 18 '19 at 20:45

answered Mar 17 '19 at 20:33

Arthur Yip

5,810
2
31
50

Joint by date range and ID ,panel data

1 Answers1