Update dynamic_programming/coin_change.r

Co-authored-by: Copilot <175728472+Copilot@users.noreply.github.com>

Author: Sachinn-64

dynamic_programming/coin_change.r

@@ -21,7 +21,6 @@ coin_change <- function(coins, amount) {
 
   # Initialize DP array
   dp <- rep(Inf, amount + 1)
-  dp[1] <- 0
   dp[0 + 1] <- 0  # zero coins needed for amount 0
 
   for (i in 1:amount) {