I want to use lists to easily replace parts of a matrix. As an example, I want to replace the code

```
ReplacePart[{{1, 0}, {0, 1}}, {{1, 1} -> 13, {1, 2} -> 14}]

```

by something like

```
ReplacePart[{{1, 0}, {0, 1}}, {{1, 1}, {1, 2}} -> {13, 14}]

```

which doesn't work. For a general matrix `m`, I want to, given a list of indices of the type `(x,y)`, `li` and a list of replacement values, `lr`, use something like

```
ReplacePart[m, li -> lr}]

```

Any idea how to do this?