
<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<style type="text/css" style="display:none;"><!-- P {margin-top:0;margin-bottom:0;} --></style>

</head>

<body dir="ltr">

<div id="divtagdefaultwrapper" style="font-size:12pt;color:#000000;font-family:Calibri,Arial,Helvetica,sans-serif;" dir="ltr">

<p></p>

<p class="MsoNormal"></p>

<p class="MsoNormal"></p>

<p class="MsoNormal">Hello,<o:p></o:p></p>

<p class="MsoNormal">I would like to assign a unique ID number to each patch (a patch is composed of a set of adjacent cells) as shown in this figure:<o:p></o:p></p>

<p class="MsoNormal"><o:p> <img size="35110" contenttype="image/png" id="img355127" crossorigin="anonymous" aria-expanded="false" tabindex="0" style="max-width: 99.9%; user-select: none;" src="cid:bab831e5-4246-4a77-884c-0012101662a5"></o:p></p>

<p class="MsoNormal"><br>

</p>

<p class="MsoNormal">I tested the clump function (package raster) <span lang="EN-GB" style="background-image: initial; background-position: initial; background-size: initial; background-repeat: initial; background-attachment: initial; background-origin: initial; background-clip: initial;">

by applying an eight adjacent cells rule but this function mixes all cell values into single patch. </span><o:p></o:p></p>

<p class="MsoNormal"><br>

</p>

<p class="MsoNormal">Here is a code example to create a raster. The raster contains values ranged from 1 to 9.<o:p></o:p></p>

<p class="MsoNormal">r <- raster(ncols=12, nrows=12)<o:p></o:p></p>

<p class="MsoNormal">r[] <- round(runif(ncell(r),1,9),digits=0)<o:p></o:p></p>

<p class="MsoNormal">plot(r)<o:p></o:p></p>

<p class="MsoNormal"><br>

</p>

<p class="MsoNormal"><span style="font-family: Calibri, Arial, Helvetica, sans-serif, "Apple Color Emoji", "Segoe UI Emoji", NotoColorEmoji, "Segoe UI Symbol", "Android Emoji", EmojiSymbols; font-size: 16px;">Is there a way to assign a unique ID number to grouping

 cells that form a patch for each class (i.e., values 1, 2, 3, 4, 5, 6, 7, 8, 9) </span><span style="font-family: Calibri, Arial, Helvetica, sans-serif, "Apple Color Emoji", "Segoe UI Emoji", NotoColorEmoji, "Segoe UI Symbol", "Android Emoji", EmojiSymbols; font-size: 16px;">?</span><br>

</p>

<p class="MsoNormal"><span style="font-family: Calibri, Arial, Helvetica, sans-serif, "Apple Color Emoji", "Segoe UI Emoji", NotoColorEmoji, "Segoe UI Symbol", "Android Emoji", EmojiSymbols; font-size: 16px;"><br>

</span></p>

<p class="MsoNormal">Thanks a lot for your time<o:p></o:p></p>

<p class="MsoNormal">Nell<o:p></o:p></p>

<p></p>

<p class="MsoNormal"><o:p></o:p></p>

<br>

<p></p>

<br>

<p></p>

</div>

</body>

</html>