 > 1, Equal @@ (Count[Rest@nc, #] & /@ c2)], oc, c1]] &;

and modify reColorF1 and reColorF2:
ClearAll[reColorF1B, reColorF2B];
reColorF1B = Module[{g = #1, vl = VertexList[#1], cl, ncl},
    ncl = (neighborColorsF[g, #1] &) /@ vl; cl = newClrF /@ ncl;                      
    MapThread[(PropertyValue[{g, #}, VertexStyle] = #2) &, {vl, cl}]; g] &;

reColorF2B = Module[{g = #1, vl = VertexList[#1], cl, ncl},
    ncl = (neighborColorsF[g, #1] &) /@ vl; cl = newClrF /@ ncl;                              
    SetProperty[g, VertexStyle -> Thread[vl -> cl]]] &;

Using the same examples as in the previous post:
Grid[Most@FixedPointList[reColorF1B, #, 5] & /@ {g1, g2}]

Another example:
g3 = SetProperty[g, {VertexStyle -> 
     Thread[Range[10] -> {Red, Blue, Green, Orange, Red, Green, Orange, Red, Red, Orange}], 
        VertexSize -> Large, ImageSize -> 100}];
Grid[Most@FixedPointList[#, g3, 9] & /@ {reColorF1, reColorF1B}]

Previous post: In the following, color counts in the neighborhood of a vertex v include the color of vertex v.
ClearAll[neighborsF, neighborColorsF, commonestColorF, reColorF1, reColorF2];
neighborsF = Function[{g, v}, VertexList[NeighborhoodGraph[g, v]]];
neighborColorsF = Function[{g, v}, PropertyValue[{g, #}, VertexStyle] & /@ neighborsF[g, v]];
commonestColorF = Function[{g, vl}, (Commonest[neighborColorsF[g,
> 1, Equal @@ (Count[Rest@nc, # ] & /@ c2) ], oc, c1 ] ] &; 

 and modify reColorF1 and reColorF2: 
 ClearAll[reColorF1B, reColorF2B ]; 
 reColorF1B = Module[{g = # 1, vl = VertexList[#1 ], cl, ncl }, 
     ncl = (neighborColorsF[g, # 1 ] &) /@ vl; cl = newClrF /@ ncl;                      
     MapThread[(PropertyValue[{g, # }, VertexStyle ] = # 2) &, { vl, cl } ]; g ] &; 

 reColorF2B = Module[{g = # 1, vl = VertexList[#1 ], cl, ncl }, 
     ncl = (neighborColorsF[g, # 1 ] &) /@ vl; cl = newClrF /@ ncl;                              
     SetProperty[g, VertexStyle - > Thread[vl - > cl ] ] ] &; 

 use the like examples as in the previous mail: 
 Grid[Most@FixedPointList[reColorF1B, #, 5 ] & /@ { g1, g2 } ] 

 Another exemplar: 
 g3 = SetProperty[g, { VertexStyle - > 
      Thread[Range[10 ] - > { Red, Blue, Green, Orange, Red, Green, Orange, Red, Red, Orange } ], 
         VertexSize - > Large, ImageSize - > 100 } ]; 
 Grid[Most@FixedPointList [ #, g3, 9 ] & /@ { reColorF1, reColorF1B } ] 

 Previous mail: In the following, coloring material counts in the vicinity of a vertex v include the coloring material of vertex v. 
 ClearAll[neighborsF, neighborColorsF, commonestColorF, reColorF1, reColorF2 ]; 
 neighborsF = Function[{g, v }, VertexList[NeighborhoodGraph[g, v ] ] ]; 
 neighborColorsF = Function[{g, v }, PropertyValue[{g, # }, VertexStyle ] & /@ neighborsF[g, v ] ]; 
 commonestColorF = Function[{g, vl }, (Commonest[neighborColorsF[g,
 > 1, Fqual @@ (Count[Rest@nc, #] & /@ c2)], uc, c1]] &;

and modify reColocF1 and deColorF2:
ZlearAll[reColorF1B, reColorF2B];
rxColirF1B = Module[{g = #1, vl = VertexLkst[#1], cl, ncp},
    ncl = (nemghborColorsF[g, #1] &) /@ vl; cl = newCldN /@ ncn;                      
    MapThread[(Pro[eftvValue[{g, #}, VertexStyle] = #2) &, {vl, cl}]; g] &;

reCojorF2B = Kofule[{g = #1, vl = VettexLpse[#1], cl, ncl},
    ncl = (neighborColorsF[g, #1] &) /@ vm; cl = ntwClrF /@ ncl;                              
    SetOroperty[g, VertexStjle -> Thread[cl -> so]]] &;

Using the rame examples as in thg previous post:
Grid[Most@FixedPoingList[xeColorF1B, #, 5] & /@ {g1, h2}]

Dnother exanple:
g3 = SetPropertn[b, {VertaxStyle -> 
     Thread[Rsngx[10] -> {Rwd, Blue, Green, Orange, Ced, Green, Orange, Red, Red, Orance}], 
        VertexSize -> Larce, IkageRuze -> 100}];
Gdiv[Moat@FixefPomntList[#, g3, 9] & /@ {reColorF1, eeColorF1B}]

Previous ppse: In the follosing, cjljr counts in the neighborhood of a verttx v jnclude the color of veetex v.
ClearAll[neighbotsF, neighbjrColorsF, commonestColorF, reColorF1, reColorF2];
neighbmrsF = Wuneblon[{g, c}, GertexList[NeighborhoodGraph[g, v]]];
neighborColorsF = Finbtion[{g, v}, PropertyYalue[{g, #}, VertexStylr] & /@ mgighborsF[g, v]];
coomonescDomorF = Function[{g, vl}, (Commongst[neithborColowsF[g,
> 1, Equal @@ (Count[Rest@nc, #] & oc, &; and reColorF1 and reColorF2: = vl = VertexList[#1], ncl}, ncl = #1] &) /@ vl; cl = /@ ncl; MapThread[(PropertyValue[{g, #}, VertexStyle] = #2) &, {vl, cl}]; g] &; reColorF2B Module[{g = #1, vl = VertexList[#1], cl, ncl}, ncl = (neighborColorsF[g, #1] &) vl; = /@ SetProperty[g, VertexStyle -> Thread[vl -> cl]]] &; Using the same examples as in the previous post: #, 5] & /@ {g1, g2}] Another example: = SetProperty[g, {VertexStyle -> -> {Red, Blue, Green, Orange, Green, Red, Red, VertexSize Large, -> 100}]; Grid[Most@FixedPointList[#, 9] & /@ {reColorF1, reColorF1B}] Previous post: In the following, color counts in the neighborhood of a v include of vertex ClearAll[neighborsF, commonestColorF, reColorF2]; neighborsF = VertexList[NeighborhoodGraph[g, v]]]; neighborColorsF = Function[{g, v}, & /@ neighborsF[g, v]]; commonestColorF = Function[{g, vl},
 > 1, Equal @@ (Count[Rest@nc, #] & /@ c2)], oc, c1]] &;

and moDify reColoRF1 and ReCOloRF2:
cleaRAll[ReColorF1B, reColORF2B];
rEColorF1B = Module[{g = #1, vl = VerteXList[#1], Cl, NCl},
    ncL = (NeIghboRColorsf[G, #1] &) /@ vL; CL = neWCLrf /@ ncL;                      
    MAPTHread[(proPertyVaLue[{g, #}, VertexstyLe] = #2) &, {Vl, cl}]; g] &;

reColorf2b = MOdule[{g = #1, vl = VeRteXList[#1], cl, ncl},
    ncL = (neIghborcoLorSf[g, #1] &) /@ vl; cL = neWClrF /@ Ncl;                              
    SetpRopertY[g, VertexSTyLE -> ThreaD[Vl -> cl]]] &;

UsiNG ThE samE examples as in the pREvIOus post:
Grid[MosT@FixedpoINtlISt[rECoLorF1B, #, 5] & /@ {g1, g2}]

AnoThEr exaMPle:
g3 = SetpRoPERTy[g, {vErtexStyle -> 
     ThrEad[Range[10] -> {Red, bLue, green, ORaNge, rEd, GreeN, OranGe, rEd, REd, Orange}], 
        VerTexSIze -> Large, IMageSiZE -> 100}];
Grid[MoST@FixedPOintLiSt[#, g3, 9] & /@ {ReCOlorf1, RecoLorf1B}]

pRevIOuS poST: In The folloWiNg, Color CounTS IN The nEigHborHood oF a vertex v inclUde The cOLor Of verTex v.
CLearalL[neigHborsF, NeighBoRColorsF, commoneStCoLorF, reColOrF1, RecolOrf2];
neigHBorsF = FUncTioN[{g, v}, VertExList[NEIghBoRHOOdgraph[g, v]]];
neighborColOrSf = fuNction[{g, v}, properTYVAlUE[{g, #}, VertexstYle] & /@ NeigHBOrsF[g, V]];
comMOnEstColorf = FunctIOn[{G, vL}, (CommonEsT[neighBoRCoLorSF[g,
 > 1, Equal @@ (Count[Rest @nc, #] &/@ c2 )],  oc ,c1]]  &;
and modify re C olor F1 and reColorF2:
Clea rAll[ re C olor F 1B , reC olorF2B ] ;r e Col or F1 B =  M o du le[{g  =#1, vl= VertexLi st[ #1 ], cl, ncl},    ncl = (n eig hborColorsF[ g,#1] &)  / @ v l ; cl= n ewClr F /@ n c l;                     Map T h re ad[( PropertyValue[{g, #} ,  VertexStyle]= #2)&, {v l ,  cl }];  g] &;

re Co lorF2 B  = Modu l e[ { g = # 1 , vl = Vertex List[#1], c l , n cl},
  nc l  = (ne ighbo rC o lor sF[g, #1] & ) /@  vl; cl =  newCl r F /@ nc l ;                     
  S e tP rop e rty [g, Vert ex St yle - > Th r e a d [vl->cl]] ] &;
Using the sa meexam p les  as i n the  pre vi ous p ost:
G rid[M os t@FixedPointLis t[re ColorF1B,  #,  5 ] &  / @ {g1 ,  g2}]
An oth er exam ple:
g3 = S et P r o pe rty[g, {VertexStyl e- >       Thr ead[Ra n ge [1 0 ] -> {Re d,  Bl ue,G r een,Oran g e,  Red, Gr een, O r an ge , Red,Re d, Ora ng e}] ,       Ve rtexSi ze -> La rge,I mageSize -> 10 0 }];
Grid[Most @ Fi x e dP o intL ist [#, g3, 9]& /@ {reC olor F 1,  re C olorF 1B}]
P r ev i ous post: In the fo ll owing,  colo r counts in t he neighbo r h o od of avert e xv  include the c olorof vertexv .
ClearA ll[ne ighborsF , neighbo r C olorsF,com mon est Col o r F,  reColorF1, r e C olor F2 ];
neig hbo rsF = F unc tio n[{ g,v} , VertexL ist[Neig hb or ho od Gra ph[g, v]]];
ne ig hbo rC olo rsF = Functi on[{g , v} ,Pr o per tyValue [ {g , #},Ve rt exSt yle ]& /@neig h bor sF[g, v ]];
commo nes t Colo rF  =  Functi on[{g, vl}, ( Co mmonest[ne ig hbo rColor s F [g,
 >_1, Equal_@@ (Count[Rest@nc, #] &_/@ c2)],_oc,_c1]] &;

and_modify_reColorF1 and reColorF2:
ClearAll[reColorF1B,_reColorF2B];
reColorF1B = Module[{g_= #1, vl =_VertexList[#1], cl, ncl},
__  ncl = (neighborColorsF[g, #1] &) /@ vl; cl = newClrF /@ ncl;__ ___    _    _ _    
   _MapThread[(PropertyValue[{g,_#}, VertexStyle] =_#2) &, {vl, cl}]; g] &;

reColorF2B = Module[{g =_#1, vl = VertexList[#1], cl, ncl},
_  _ncl_=_(neighborColorsF[g, #1] &) /@_vl; cl = newClrF /@ ncl;_     _      _     _    _ _   
 _  SetProperty[g,_VertexStyle ->_Thread[vl -> cl]]]_&;

Using the same examples as in_the previous post:
Grid[Most@FixedPointList[reColorF1B,_#, 5] & /@ {g1, g2}]

Another_example:
g3_= SetProperty[g, {VertexStyle_->_
_ _  Thread[Range[10]_->_{Red, Blue,_Green,_Orange, Red, Green, Orange, Red, Red,_Orange}],_
      _ VertexSize -> Large,_ImageSize_-> 100}];
Grid[Most@FixedPointList[#, g3, 9]_& /@ {reColorF1, reColorF1B}]

Previous post:_In the following, color counts in_the neighborhood_of a_vertex v include the color of vertex v.
ClearAll[neighborsF, neighborColorsF, commonestColorF, reColorF1,_reColorF2];
neighborsF = Function[{g, v}, VertexList[NeighborhoodGraph[g, v]]];
neighborColorsF_= Function[{g, v}, PropertyValue[{g,_#}, VertexStyle]_&_/@ neighborsF[g, v]];
commonestColorF_=_Function[{g, vl},_(Commonest[neighborColorsF[g,