несколько разных номеров строк по идентификатору, чтобы знать, если используется или нет - PullRequest
0 голосов
/ 24 мая 2019

Я хочу сопоставить используемую величину загрузки с общей суммой по каждому идентификатору и пометить его, если он используется или не используется, или используется частично

ДО

df <- data.frame(id=c("101","101","102","102","102","102", "103", "103", "104", "104", "104", "104"),
          load=c(1889.46, 3239.27, 1253.81, 1253.81, 1103.81, 211.95, 1437.64,1437.64, 422.38, 300, 300, 300),
          used=c(5128.73, 5128.73, 3611.43, 3611.43, 3611.43, 3611.43, 1437.64,1437.64, 922.38, 922.38, 922.38, 922.38))

РЕЗУЛЬТАТ

, например, в ID 103 - в ID 103, скажем, я использовал свою кредитную карту три дня назад, чтобы купить что-то за 200 долларов, и она была вчера одобрена моим банком, так что это означает, что яиспользовал 200 долларов с моей карты и оплачивается.Сегодня я снова купил еще что-то за 200 долларов, но еще не утвержден моим банком (все еще ожидающим решения).В результате я совершил две отдельные транзакции по 200 долларов, но только первая была оплачена.Надеюсь, этот пример понятен и для других сценариев?

result <- data.frame(id=c("101","101","102","102","102","102", "103", "103", "104", "104", "104", "104"),
      load=c(1889.46, 3239.27, 1253.81, 1253.81, 1103.81, 211.95, 1437.64,1437.64, 422.38, 300, 300, 300),
      used=c(5128.73, 5128.73, 3611.43, 3611.43, 3611.43, 3611.43, 1437.64,1437.64, 922.38, 922.38, 922.38, 922.38),
      result=c("paid","paid", "paid", "paid", "paid","not used", "used", "not used", "used", "used", "partially used", "not used"))

enter image description here

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...